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ABSTRACT 


Rie Oo  SerLes Microcomputer is being used as tne 
host computer in a microprocessor development system (MDS). 
Tne MDS hardware, consistine of tne PRO-LOG STD bus, a 2720 
cpu card, 2K bytes SPROM and 36% bytes random access nemory, 
is controlled by the nost via a single serial I/O port. Tne 
memeem  Drovides tne candbility to develop and test Sotn 
software ani nardware in tne combined CP/M (MP/M) and MDS 


environments. 
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I. INTRODUCTION 


mere Naval Postgraduate Scnool S#lectrical Engineering 
Department 5s microcomputer/nicroprocessor development 
laboratory, presently being used for microprocessor 
a@ppeccation courses at the beginning and intermediate 
levels, orfers two metnods of applications developnent. One 
method uses the Tektronix &¢@42 development system. While 
this systen is very capadle for hardware applicaticns 
development, it iS limited in available software, provides 
for use by only a single user at a time, and takes a 
@emeracredlie amount of time to le€arn to use properly. Also, 
Seema Of the hieh cost of additional in-circuit emulation 
modules for different processors, the system nas been slow 
to expand. On the other end of tne spectrum, tne ALTOS 
series single and multi-user microcomput2r systems provide 
extremely vooi Support for software development due to tne 
vast variety of CP/M based software currently available. 
These systems nave a mucno lower per-user cost and provide a 
work environment more ennancinre to iPod veda t 
productiveness. Tne primary disadvantage, nowever, is tne 
lack of Support for hardware development, without having to 
get inside tne computers and building some type of Kludged 


intertace whose reliability is often haphazard at best. 





Tae design and implementation of a relatively low cost, 
mer cONMpeexs 1 byw Uueny tlexidle microprocessor development 
system, combining many of tne good features of each of these 


metnods is tne topic of furtner discussion in this thesis. 








II. THE MICROPROCESSOR DEVELOPMENT SYSTEM 


Poe boweding needs of this microprocessor aevelopment 
system (MDS) are grouped into the four areas listed below: 

The overall system cost snoula be relatively low in 

contrast to large development systems such as the 


Tektronix 8d¥2. 


Tne MDS snould be of low complexity in both software 
and nardware requirements. 


Tne system shouid utilize existing software and 
Mearmaware to the best extent possibile. 


The system snould be expandabdle and easily 
customized or reconfigured tO operate with numerous 
evner microcomputer systems. 

The determination of these needs made the selection of 
final requirements alimost automatic. Tne primary decisions 
were wNat capabilities Should be included in tne MDS within 
the constraints of tne needs given and the time availantle. 
iyoeeas development system components include SoOruware 
support for editing, assembling and dedueging applications 
programs and nardware support for testing both tne software 
and hardware in an in-circuit emulation (ICE) environment. 

Because of the low complexity constraint and the limited 
time available for this project, it was decided tnat tne IC 
component would be the area where most of the compromises 


would be made during the system design. To furtner meet tne 





stated needs, the decision was made to design tne system for 
Omemation as a tase in the CP/M and MP/M operating systens 


environment. 


A. HARDWARE CONSIDERATIONS 

Initial ideas for meeting tne hardware needs of tne MDS 
mmeaed Utilizine an ALTOS microcomputer as tne control 
computer for a separate hardware development system. The 
memaarum Mherdware daevelopment system would consist of a 
dedicated microprocessor, EPROMS for an onboard monitor, 
sufficient random access memory (RAM) for storage and 
eer on of fairly complex programs and 2a serial RS—-232eC 
port for interface to tne ALTOS. 

Tne ALTOS computer and tne nardware development system 
together would form the complete microprocessor development 
eyemenv. For clarity, the ALTOS computer will nmencefortn be 
referred to as the “HOST”, tne hardware development system 
as the “MDS” and the overall system as the “AMDS’, for ALTOS 
Pucromrocessor Development System. 

The MDS hardware was the subject of primary 
Somsiaerdation during the initial stages of system design. 
Consideration was first given to wire-wrapping circuits to 
meet tne stated minimum nardware requirements, dut this 
approach was soon recognized as being prohibitive due to the 
considerable time requirements involved for tnis type of 


work. 





momo enoroach Would also Contribute to a less reliable anda 
less flexible system for long term use and future expansion. 
mamas, tne decision was made® to us®@ a standardized  obus 
System which 2as achieved industry acceptance in both proven 
applications and in manufacturer support and wnicn would 
offer 2a reasonable initial system cost (under $15¢@.0¢). 
Wnile several manufacturers offer sucn a system, the PRO-LOG 
Corporation STD bus was cnosen over others primarily due to 
its immediate availability and local manufacturer support. 
Tne final MDS nardware configuration consists of tne 
following PRO-LOG components: 
A 16 slot STD dus and card cage with provisions for 
Wire@-wrapped cards. 
Reeetieg 22e processor card with onboard provisions 
for up to 4K bytes of RAM and up to 8K bytes of 2716 
EPROM. 
Two 15K byte static memory cards. 
A dual USART card consisting of two Puy 
Pome penmaent, iasyncnronous RS~-25eC serial ports with 
provision for one of these to pe configured as a ema 


meop tor TTY applications. 


Several blank Wet bh ty cards for wire-wranvped 
applications. 


A DC power supply providing +5V/10A and +#12V/1A. 


Tre only nardware modification Mecessary ¢O g£@t this 
System operable was tne addition of a manual reset switcn 


mwecn 1s Only 2a momentary -eround to tne pusn—-dutton reset 
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pemeeeteyeonmethne ST) bus. The STD tus pin derinitions are 


Piven in Figure il. 


el: 
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Figure 1 = PRO-LOG STD Bus Pin Definitions 
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Figure 1 (cont'd) 
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B. SOFTWARE CONSIDERATIONS 

The editing, assembling and debugging software needs for 
the AMDS were easily fullfilled by deciding to utilize CF/™M 
based software. The basic CP/M and MP/M operating systems 
provide software for each of these needs, therefore 
Simplifying the overall system design considerably. 
Additionally, the existence of a vast selection of CP/M 
based software products on the commercial market greatly 
enhances the growth prospects for software applications 
development with this system. An added feature of tne 
decision to use CP/M based software is the ability to 
develop and test software on any microcomputer using the 
CP/M operating system. This feature alone is one of the most 
advantageous aspects of the AMIS. 

With these capabilities accounted for, the remaining 
software considerations were those of determining the 
software requirements for the HOST to control the MDS and 
deciding upon those capabilities which should be included in 


the control software package. 


C. THE SYSTEM CONTROL SOFTWARE 
ime sysvuem Control software needs were divided into two 
areas: 1) the control program resident in the YOST, to de 


used in exercising overall control of both the ALTOS and the 


MDS and; 2) the MDS onboard monitor program, to be used for 
communications with the HOST and for interpreting and 


executing HOST commands. 
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C—O a ai” 


fe tre HOST Control Software 


Poem vr imianry functions of the AMDS control program 
resident in the HOST are to communicate with the system user 
and to exercise positive control of the MIDS. It is intended 
to be the workhorse of the system, providing numerous 
routines to simplify the work required of the MIS. 

A study of the monitor and control programs for 
typical development systems helped in identifying the 
following software needs as the most essential user 
requirements for implementation into the HOST Conianon 


program: 


A routine to download data from disk to MIS memory. 


A routine to upload data from MDS memory and store 
mee on disk. 


A routine for examining and modifying MDS memory 
CONTENTS. 


A routine for filling specified blocks of MDS memory 
With a specific byte of data for memory initialization. 


A routine to locate a specific data sequence in MDS 
memory. 


A routine to dump the contents of MIS memory to a 
eRT or printer in a format conducive to user 
interpretation. 

A routine to initiate the execution of a program 
previously placed into MIS memory. 

Bach of these routines are implemented in the HOST 

control program. Additional routines provide: 1) the ability 


to perform additions and subtractions of two hexadecimal 


LS 


numbers and display the results, 2) a routine for continuous 
modification of Mis memory without an intermediate 
examination of each location, and 3) routines for online 
user self-help and system use instructions. 

The primary ccnsideration in the design of the HOST 
control program was in making it user oriented. Thus, 
considerable effort was made to make the system easy to 
learn and to provide positive user feedback in all modes of 
operation. Examples of this include the implementation of a 
menu displaying all user options, detailed instructions for 
required input formats (available at any time), and fully 
explanatory error displays. Operation of the system is 
designed so that the user should never be in doudt as to 
what is going or what is required of him. 

The control program flow is straightforward. Program 
Parameters are first initialized followed by displaying tke 
menu of options on the user’s console and prompting him for 
input of the desired option. The input is then interpreted 
and a branch is made to the routine chosen, whereupon the 
Peereis aeain prompted for additional input unique to that 
option. Upon completion of the option, at the command of tke 
user or after a trap to certain errors, the program returns 
control to the menu routine to await further user commands. 
This flow is easier visualized, as shown in Figure 2. 

The flow of the individual option subroutines is 


equally simple. Upon entering each routine, again various 
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parameters are initialized and the user is prompted for 
Paeenat input. When the proper input is received, the 
routine takes the necessary actions to perform the task, 
mieiudaing communications with the MDS, if applicable, and 
prompting the user for additional inputs as required. On 
completion of the option, control returns to the menu 


routine. 


i 
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Poarwin TERS 
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CET USERS 
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See ED 
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OPTION COMPLETED 
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RRROR 
oT; 
USER SRA LT 






Figure 2 = HOST Control Program Flowchart 
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wemewcermluputw2s cCnecked for validity includine 
proper syntax, correct number and placement of parameter 
delimiters and Lor valid hexadecimal digits where 
applicable. Additionally, the input is checked for user 
requests for help or to terminate the option and r2turn to 
the menu. Data input and output formats were kept as 
compatible as possible with those in the CP/M dynamic 
debugging tool (IIT). All input is terminated with a 
carriage return or a line feed and input line editing 
functions conform to the rules set forth in the CP/M and 
MP /M users manuals. BY maintaining this degree of 
compatibility the learning cycle of the AMIS user should be 
lessened considerably. 

System errors are divided into two categories; those 
due to faulty user inputs and those due to disk I/0 
operations. TPepending on the particular error, errors may 
take one of three courses of action. They may return 
directly to the menu, they may restart the option in 
progress when the error occurred or they may simply return 
to the point where the error occurred and await user 
provided corrective measures. More details are provided in 
the AMDS user’s guide. 

The final area of the HOST control program requiring 
discussion is that of the routines and associated protocols 
used for intercommunication between the HOST and the MOS. 


Because the MIS may not always utilize a fast processor such 


WS, 








as the Z8¢ and since the MIS 1s provided with the ability to 
execute user programs in real time, it was conceivable that 
the MIDS response time to the HOST could be considerably slow 
in some instances. This also brings up the possibility of 
iomsuecrata 221 the HOST is transmitting faster than the MDS 
Can service its serial I/O port. A final problem in such an 
asynchronous setup is what the data sent is intended for, be 
it a command or some type of processable data. 

In order to alleviate the lost data problem and to 
lessen the response time to the HOST, several assumptions 
were made in the communications software design. The primary 
assumption is that the HOST nas communications priority at 
all times. From this assumption the following protocols were 
established and implemented. A type of software handshaking 
between HOST and MDS is provided for each character sent by 
either device. Some experimentation was done with the use of 
packets of characters greater than one, but some data loss 
was experienced when either the HOST or MDS was busy with 
other tasks besides I/0. Though time prohibited furtuter 
experimentation in this area, it is felt that some tyve of 
hardware initiated control signals would be necessary to 
increase transmission/reception reliability in a packet 
communications mode for this system. 

The protocol thus implemented follows several rules. 
For each piece of data to be transmitted two bytes of data 


are actually required. The first byte indicates the type of 
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data to follow. Types include command data, pure data, and 
status data. Each type is assigned a hexadecimal equivalent 
as follows: 
55H indicates that the next byte to be transmitted 
will be a command 


OFFH indicates that the next byte to be transmitted 
will be pure data 


G6G@H indicates that the next byte to be transmitted 
will be status data (the only currently implemented 
Status data is O9@H, meaning the sender is at some point 
in the execution of its program where it awaiting input 
from the other device in order to proceed) 

As an example, when the user wants to examine an MIS memory 
location the HOST first sends the data sequence: 


9550 , 05848 (2584 is the ASCII hexadecimal code for 


a 


“X , the Examine Command) 

Arter receipt and display of the data in MIS memory, the 
user wants to change it to say, O3FH, thus the HOST would 
send the sequence: OFFH , O3SFH . 

iimeaadituommroe thas rule, recall that a software 
handshake is provided for every character sent. As each 
G@memacter 1s received, the receiving system returns an 
acknowledgement byte of 611H, the ASCII hexadecimal code for 
XON, meaning the character has been received and further 
transmissions may proceed. At the same time, the sender is 
awaiting this acknowledgement before proceeding with further 
transmissions Or Semtinuime on to other tasks. This 
handshaking overhead seems unrealistically bigh at first 


glance, but it is negligible to the user for most types of 


rn 








applications envisioned for this system and it provides a 
high degree of confidence in the communications setup. 
Perhaps the only time the communications throughput would be 
degraded, in the user’s eyes, would be when an application 
program might require nearly continuous data transmissions 
for a lengthy period of time. A way around this particular 
situation is discussed in the Seer ion on system 
implementation. 

To improve MLS response to HOST transmissions, the 
feemeeriecks fOr receipt of a HOST transmission prior to every 
omtemwt to the HOST. If the HOST has sent information, 
typically a new command, the MDS halts whatever it was doing 
and processes the new data. 

Further details concerning the HOST control program 
are discussed in the system user’s guide and all routines 
are well documented in the source code listings and flow 


diagrams in the appendices. 


2. The MDS Onboard Monitor 


Because the HOST control program was designed to do 
most of the the work required of the AMDS, the MDS monitor 
software was much easier to develop. 

The monitor software essentially consists of a 
command/data interpreter, a set of complementary routines 
for each of the HOST initiated MES options, and a similar 


set of I/O routines for communications with the HOST. The 


ae 














program flow is basically the same as described for the HOST 
control program, with the exception that there is no direct 
input from the user. The MIS monitor does not have any error 
Bouiemes Simce all system error detection is built into the 
HOST control program. If for any reason the monitor does not 
understand the HOST transmissions it simply waits until 
something is sent that it does recognize and then proceeds. 
Mirewen it is unlikely that the system will get hung up ina 
Pooper ing normal HOST to MDS communications, if it should 
occur, either an ESCape sequence from the HOST or a manual 
reset of the MDS will terminate the loop. The only 
foreseeable circumstances in which this might occur are when 
a user program, executing in MIS memory, attempts to obtain 
information from the HOST when the HOST is not expecting 
such a request. 

MicmEnoOniGon mts Written for automatic startup after 
either a system power-on reset or a manual reset. All MIS 
serial I/O ports are initialized to communicate at S602 
baud. Routines for user program 1/0 with the HOST console 
and for return to the MDS monitor are also provided via 
Simple user calls, as explained in the user’s guide. 

Again, more detailed information may be best gleened 
from the AMIS user’s guide, the flow diagrams and 


accompanying source code listings in the appendices. 
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III. SYSTEM IMPLEMENTATION AND CUSTOMIZATION 


The AMPS 1s a modular system with respect to both 
Software and hardware. Though this thesis is concerned 
primarily with implementation of the system as already 
stated, with an ALTOS microcomputer and the PRO-LOG STI 
hardware, the design is intended to be usable on any other 
CP/M or MP/M based system with only a few software changes 
and minor additional hardware interface requirements (beyond 


the MDS hardware needs, naturally). 


A. PUTTING IT ALL TOGETHER 

Implementation of the HOST control program is simply a 
matter of loading and executing the program via the normal 
CP/M method of typing in the name of the object file, in 
this case “AMDS”’, followed by a carriage return or line 
feed. 

Implementing the MIS system, while not especially 
taxing, does require the use of a PROM programmer to load 
the monitor software into EPROM. Once this is accomplished, 
and the EPROMS are installed, the system implementation is 
nearly complete. All that remains is connecting the systems 
together, turning on the power and the reset is automatic. 

This particular development system is coupled together 


via a standard RS-232C connector cable set with a 25-pin, 
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DB-25P, male “D’ connector on the HOST end and a 26-pin 
female Amphenol connector on the MDS end. Only the signal 
eround, transmit and receive signals are necessary and other 
RS-232C signals are ignored in this implementation. (The 
standard RS-232C pin definitions are shown in Figure 3.) The 
HOST end of the connector is plugged into the auxiliary 
serial port on the ALTOS multi-user system and the MIPS end 
is connected to the “A” channel socket on the dual USART™ 
card. Additionally, it should be ensured that the “A” 
Channel is jumpered for OLDTE (Tata Terminal Equipment) 
operation, as explained in the dual USART card documentation 
listed in the bibliography. 


These procedures are all that is necessary to implement 


and use the basic system. 


Zo 








PGND 
RXD 


TAD 
ele 


CTS 
DSR 
SGND 
RLSD 
DTR 





- No Connection 


Protective Ground 
Transmitted Data (TXD) 


Received Data (RXD) 
Request to send 
Clear to send 

Data Set Ready 


Signal Ground 
Received Line 
etc Deteer 
Data Terminal Ready 


Figure 3 = RS=+232C Pin Definitions and 


System I/O Setup 
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B. CUSTOMIZATION 

The primary areas of customization of the AMDS are those 
concerning the use of different processors in the MIS and 
Meeruse of different serial interfaces. 

At present the PRO-LOG Corporation STL bus supports the 
80980, 8885, 280, Z8@A and the 6800 series microprocessors. 
The current implementation uses the Z8@ with onboard SFROM 
and RAM. The ROM and RAM address areas may be jumpered to 
either the lower (as done here) or the upper i6k of address 
space. In order to use the monitor in the upper 16% of 
address space would require a hardware addition capable of 
taking control of the address lines, at power-on reset or 
manual reset, and forcing tne next execution address to 
coincide with the first address of the monitor. Otherwise, 
the Z8@ (and 8980/8885) processors normally execute location 
@QOO@H after a reset sequence. If no monitor progrem is 
located at this location the processor executes garbage 
until a HALT instruction is encountered. An implementation 
of the monitor in high memory, however, is an idea to be 
well considered for future versions of the AMIS, as it would 
provide better compatibility with the page zero I/O mapping 
Scheme used by the 6&@@ microprocessor. As an additional 
benefit, it would lessen some of the software limitations 
currently imposed by the current configuration. These 
limitations are discussed in a separate section of this 


paper. 
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Memeetor tie wWse== or different serial I/0 interfaces, 
several hardware additions may be necessary on the ALTOS 
computers. If the system is used with the single-user ALTOS 
computers, the options are to use the serial port currently 
used by the printer or to build an additional serial port 
into the computer via the use of its internal bus connector. 
If using the multi-user system, two AMIS systems could be 
Supported simultaneously by simply using two of the serial 
Domenomcurrently used for consoles. To Support four complete 
AMDS systems would require the addition of three more serial 
ports in amanner similar to that discussed for the si1rgle 
user system. 

The changes in serial port usage would require afew 
Minor changes in the HOST control program. If ZILOG SIO 
devices are used, as presently installed in the ALTOS series 
computers, the software modification reduces to simply 
Changing the status (MSTATPT) and data (MIATAPT) port 
designations in the “equates” (EQU statements) section at 
the beginning of the HOST control software source code and 
then reassembling the code for the new serial ports. if 
serial communication chips other than the SIO are used, the 
HOST control routines MDSTAT, MDSIN, and MUSOUT would have 
to be modified to operate with the particular chip chosen. 

On the MDS side of the system, the customization process 
for software changes of serial ports is very similar to that 


of the HOST. Using additional INT&L 8251 USARTsS would 
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necessitate only changes to serial port equates for CHASTAT 
and CHADATA in the MDS Monitor source code, followed by 
reassembly and reprogramming of tke EPROMs. Use of serial 
devices other than the 8251, would require appropriate 
Changes to the MIS routines HOSTAT, HOSTIN, and HOSTOUT. 

Beyond these hardware oriented customization procedures, 
provisions have been included for the addition of more user 
options and error processes in the HOST control software. 
Each of these areas use “jump” tables to vector to the 
Guiemoumeor error routine selected. To add an option to the 
menu, the new option routines would be added to the body of 
the current source code, a JMP xxxx (xxxx is the option 
label) instruction would be added to the menu jump table and 
the menu display would be modified appropriately in the 
message storage section of the source code. The insertion of 
additional error codes is identical, except that the jump 
instructions are inserted in the error jump table. 

One further comment on the addition of user options 
concerns the method of decoding the option selected. Menu 
options are identified by an assigned alphabetic character 
from A through Z (current options go only through the letter 
N). The ASCII code for each option is modified for use with 
the jump table in the following manner. The ASCII code is 
first ‘anded” with the data Q1FH. This removes all ASCII 
biasing and leaves only the hexadecimal equivalents of the 


Gmumeers l torouga 26, Corresponding to the letters A to Z. 
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These numbers are then used to find the appropriate vector 
from the jump table, as further explained in the source 
documentation. Thus the provision for twelve more options, O 
berough Z, is included in the current version of the HOST 
control software. If these options are added, simple changes 
are also required to the equates for MAXCHCH, the highest 
moeomelretter in use, and for NHSTCML, the current number of 
“host only” commands. 

A consideration to Keep in mind wnen editing the dHdST 
software is the fact that it is currently a 62K byte file 
and thus larger than the index table capacity of the TEI 
text editor used widely at the Naval Postgraduate School. 
For this reason, the source code is broken into two files: 
AMISP1.ASM containing the primary option routines, and 
Mifeeemnst CONntaining the utility and support routines and 
message and data storage definition areas. Prior to 
assembly, the files are concatenated via the use of the CF/M 


Peripheral Interchange Program (PIP) as follows: 


PIP AMDS .ASM=AMDSP1.ASM,AMDSF2.ASM 
The file AMIS.ASM is then assembled using whatever assemoler 
moncesired . 

MTS monitor software customization is at least as 
Simple, if not easier than that for the HOST. Commands are 
decoded via the simple mechanism of comparing the command to 


a set of known commands and then jumping to the option 
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routines selected. The only additional source code changes 
which might be applicable to the MIS would be a change of 
the assembly origin (ORG statements) addresses if the 
monitor is to be moved into upper memory as mentioned 


previously. 


fool SM LIMITATIONS 

This system, as with many other well designed systems, 
also has its limitations. Some of these have already been 
alluded to in previous sections and will now be discussed in 
more depth. 

The current MDS configuration, with the lower 16% 
address space reserved for the monitor 230M and RAM, imposes 
several notable limitations on the use of the AMUS. Besides 
the page zero I/O mapping incompatibility between the 6882 
and 288, which has already been pointed out, the inability 
to use this address space for user program execution places 
a restriction on the types of CP/M based software which may 
be downloaded and executed in tne MIS memory. 

CP/M’s executable object files, designated as °.COM’ 
files, are created with the implied intent of loading and 
initiating the execution of these files from location @i10@d. 
Since this location is within the reserved area in the MIDIS, 
such °.COM”’ files cannot be downloaded and executed in MIS 
memory. Unfortunately, most CP/M software on the commercial 


market is distributed in this format. 
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Pm@eweGrestriction thus imposed is that only disk files in 
the INTEL Hex Format (see Figure 4) or ina page relocatable 
format may be downloaded and executed in MDS memory. This is 
because these formats are not dependent upon any address 


restrictions and are exé€cutable in whatever address snace 


for which they are assembled. 
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RL - 


RT = 


DATA 


CK - 


RECORD HEADER: AN @SCIIT COLON (3A HEX) 
SIGNALS THE START OF EACH RECORD. 


RECORD LENGTH: TWO ASCII HEX CHARACTERS GIVE 
THE RECORD LENGTH (THE NUMBER OF 8-BIT DATA 
Bebo it THe HECORD). END OF FILE IS INDICATED 
BY A ZERO RECORD LENGTH. (10 HEX IS MAX. RL) 


LOAD ADDRESS: FOUR ASCII HEX CHARACTERS GIVE 
Tee RESSs WHERE THE FIRST DATA BYTE OF THE 
RECORD 1s LOCATED. 


ReGen veers. THE RECORD TYPE IS ALWAYS OO 
BXGerr PORSTHE LAST RECORD OF AUTOSTART FILES, 
ini ET tS Ol. 


- TWO ASCII HEX CHARACTERS REPRESENT EACH 
8-BIT DATA BYTE. 


CHECKSUM: TWO ASCII HEX CHARACTERS GIVE THE 
Neer soUM SOR ALL PREVIOUS BYTES IN THE 
Peco ome eene, MOR LHe COLON. THE SUM OF ALL 
Pagoe SY boeeeUS RAE CHECKSUM EQUALS ZERO, 


Miencers — MPER HEX File Record Format 
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The free address space of the present MIS, 4@@@n to 
@BFFFH, is therefore sufficient for the needs of these file 
types. As mentioned, most distributed software does not come 
muecese formats. For use of tne MIS in beginner and 
intermediate level course work, nowever, this restriction 
should not be a dominant disadvantage in applications 
development and in gaining an insight into the use of 
microprocessors. 

Because of the time constraints imposed, as well as this 
Student’s lack of familiarity with page relocatable file 
eemmats. only the use of type “°.FEX’ files are supported for 
upload and download operations in the current version of the 
Aes. 

Other limitations of the system are: the lack of 
breakpoint setting and cpu register examination facilities 
Memmeiertipo, the lack of a facility for moving blocks of MIS 
memory; the inability to operate the MPS in a true 
in-circuit emulation mode; the curré€nt limitation of having 
only a single processor and the inability to operate 
multiple processors on the MDS bus; and the limitations 
already discussed concerning communications protocols. 

Most of these limitations are only temporary, with the 
possible exception of obtaining true in-circuit emulation. 
The high communications overhead of the HOST to MES 


interface can be avoided by user programs in the MDS memory 
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Simply by utilizing a separate console and the additional 
MDS serial port when the need for high speed data transfer 


arises. 
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IV. CONCLUSIONS AND RECOMMENDATIONS 


The original needs stated for the microprocessor 
development system have been met, with the exceptions noted 
as limiting factors. Even with these limitations imposed on 
the current design, however, it is felt that a significant 
tool has been added to the small, but growing Electrical 
Engineering microcomputer laboratory. The final design of 
the system has left considerable room for future expansion 
and improvement in both areas of software and hardwere and 


is thus a good vehicle for additional thesis study. 


A. FUTURE HARIWARE 
There are numerous changes and enhancements to be made 
hemeeeme System in the hardware area. Some On these 


enhancements are described below. 


Implementation of hardware initiated communication 
control signals to increase system response and 
torouechput. 


The addition of a Master/Slave cpu capability to 
operate and evaluate different microprocessor types on 
the same bus; this capability would have to be 
implemented via the use of interrupts and the bus 
request control lines plus appropriate software. 


The addition of analog to digital and digital to 
analog (A/D and D/A) capability will significantly 
increase the usefullness of the system in hardware 
development applications. 
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Another worthwhile improvement would be the addition 
of a PROM programmer with the capability to change its 
Bermsonality under software control in order to program 
different types of PROMs. 


oeeee and the list goes on. 


B. FUTURE SOFTWARE 

Many of the immediate enhancements to the system will 
probably be an outgrowth of the limitations pointed out 
previously. These include making changes for the use of CP/M 
“.COM’ files and adding support for page relocatable files. 
These two additions alone, would tremendously improve the 
potential uses of the AMDS. 

Omer néar future additions should include facilities 
Pommemoving blocks of MDS memory and for the use of 
breakpoint, single-stepping and program trace routines. Such 
routines would probably be best implemented as individual 
files downloaded to the MIDS memory. The routines could then 
operate as an extension of the onboard monitor. This would 
also Paemmigcumrneemrlexibiljty to execute routines for 
different processors under control of a dedicated monitor. 

The addition of software for cross assembly of source 
code between various processors iS another recommendation 
worth careful consideration. One idea, which was considered 
miweeimclusiagn in this thesis but was axed for lack of time, 
is the use of macro assemblers for cross “translation” of 


Source code, The idea would be to develop source code using 
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tne standard mnemonics of a particular processor and then 
translate the source code to the mnemonics understood by 
woatever processor is actually available. Once this is 
accomplished, testing and debugging of the software can be 
done with available hardware. The code can then ie 
translated or cross assembled back to code for the original 
Peemeressor and put to use in its intended application, all 
without the use of a true development system for that 
processor. 

Finally, an area of great promise is that of systems 
networking. The new CPNET and MPNET loose-coupled network 
paemeeities, by DIGITAL RESBARCH COmeoratlon., provide 
numerous avenues for further study into allowing the AMIS to 
share its resources with other computer systems. 

All of these improvements are feasible and cost 
effective. These additions will also allow much of the 
burden to be taken off the beginning program and hardware 
designers. Much of the less interesting trivia normally 
associated with applications development can be skipped over 
and the solution to the problem can be approached in a more 


efficient and structured manner. 
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AMTS USERS GUITE 


1. INTRODUCTION 


The ALTOS Microprocessor TLevelopment System (AMIS) is 
designed to be used as an aid to students in beginning and 
intermediete levels of software and hardware applications 
development. The system consists of an ALTOS microcomputer, 
running under the CP/M or MP/M operating systems, and a 
hardware development and testing system built around the 
PRO-LOG STD bus. Included in the current (June 1961) 
hardware development system are a 2MHz 2Z8@ cpu card with 
Onboard monitor in EPROM and 4K bytes of static RAM, two 16K 
byte static RAM cards and a dual USART asynchronous RS—-232eC 
serial I/O card. The ALTOS and the hardware development 
system are linked together via a serial I/O channel. 

The ALTOS computer, hence referred to as the “HOST’, 
exercises control over the hardware development system 
(designated as the ‘’MDS”) via the execution of the HOST 
control program named AMIS.COM . The onboard monitor in the 
MTS contains routines which complement those in the HOST 
control program, though on a less complex scale. A more 
detailed treatment of the inner workings of the AMDS system 
is available in the student thesis by LT. Stephen M. Hughes, 
USN, titled “A Microprocessor Development System for the 


ALTOS Series Microcomputers . 
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2. HOW TO USE THE AMDS 

The AMIS” primary use is in the design and testing of 
both software and hardware applications in a real time 
environment. The typical steps for effective use of the 


system would be as follows: 


a) Using standard CP/M or MP/M software development 
meees, such [LIT, TEL, EL, ASM and MAC, the user would 
develop, test and debug (to the extent possible) 
software to be used in a hardware/microprocessor 


oriented application. 


b) Simultaneously to step a), the user, or other 
members of a project team, would be designing, wire 
wrapping and performing initial tests on the hardware, 
using available test equipment such as oscilloscopes, 


digital voltmeters, etc. 


c) At such time as the hardware and software are 
ready to be tested together, the AMDS would come into 
use. At this point the wire wrapped circuitry would be 
inserted into a slot in the development bus, the 
software would be downloaded to the MDS memory and, via 
the use of the AMPS user options, the software and 


hardware would be tested as a single unit. 
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d) Refinements and correction to both hardware and 
software could then be made as in steps a) and b) and 
step c) then repeated until the application operates a5 


intended. 


The intent of this procedure, though it might appear 
cumbersome, is to allow the software programmers to 
concentrate on their work using proven and tested 
development aids while simultaneously allowing the hardware 
designer/builders to forge ahead in their respective areas. 
The lesson to be learned is the “real world” concept that 
communications between such distinct but collectively 
important segments of a team effort are what is necessary 
for successful fullfillment of the project goals. These 
intergroup communications require that each team carefully 
plan the project in its initial stages of development and 
that the division of responsibilities and the methods of 
implementation of the project are thoroughly understood by 
all members of the team. With this type of planning and 
communication of ideas, the AMIS concept is thus seen as 
less cumbersome than initially thought and actually allows 
for a very flexible working environment. The use of the AMIS 
also relieves the hardware designers of much of the burden 
previously placed on students to design and wire wrap their 


own cpu and memory cards. 
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3. GETTING STARTEL 

This se@ction is intended as a quick review for those 
already familiar with the use of the AMIS. Others should 
Carefully review the remainder of this guide prior to 
attempting to use the system. 

With software developed and tested as best possible 
(naturally those software routines fully dependent upon the 
hardware have not been completely tested) and with the 
hardware prototype in hand, the Stage is Set for utilization 
Gieeeie AMDS. 

With the MCS power OFF (!) the prototype card is 
inserted snugly into one of the wide slots of the card cage 
which are specially designed to accept wire wrapped cards. 
Mieuere insuring the card is properly in place, the power is 
then switched on and the MIS reset switch is pressed. The 
MIS is now ready for use. 

Next, the AMCS HOST control software is initiated from 
the ALTOS system console by typing “AMIS”, followed by a 
carriage return. The HOST control program then loads into 
memory and begins execution by displaying a menu of user 
options and prompts the user for a reply. At this point the 
user(s) may proceed with testing using the options described 


in subsequent sections of this guide. 
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4. SYSTEM FUNCTIONS (USER OPTIONS) 

The AMDS control program is designed as a menu-driven 
program. This means that after each primary task is 
completed, the user is shown a menu of options from which he 
may chose his next move. Hach of these options is discussed 


in the remainder of tkis section of the guide. 


A. SUPPRESS PRINTING MENU - 
Selection of option “A” allows the experienced AMIS user 
to automatically suppress the display of the menu at the 
end of each option. When this is done the system status 
(whether the HOST or MES is in control) and reminders of 
which option suppresses and which does not suppress the 
menu are printed, followed by the prompt to input a menu 


OpE1on. 


Be LO NOT SUPPRESS PPRINTING MENU - 
Opposite of option “A’, option °B” allows the user to 
regain full menu display if he cannot remember the 


Gpimron code he wishes to select. 


Cs BASIC INS@RUCT LONG — 
Option “°C” displays a set of basic instructions for use 
of the AMIS. These instructions should normally answer 
the questions of most first time users without the need 


to resort to this guide. 
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Deere uGlMeiwADD and’ SUBTRACT - 

Option “LD allows the user to quickly obtain the 16 bit 
hexadecimal sum and difference of two numbers. When this 
Option is selected, a message verifying the option 
actually entered will be displayed, followed by a prompt 
ior input. 

The input expected is two hexadecimal numbers, of up to 
four digits each, separated by either a comma or a space 


as the following example shows: 
YOLAF FSAB or P>@1LAF,FSAB 


The sum and difference of these two numbers are then 


displayed as: 
SUM = F55A CIFF = GEO4 


The user is then returned to the menu for selection of 
another option. 
( ** This option has the same input format as the “dH” 


command in [IT ** ) 


B&B. RETURN SYSTEM CONTROL TO HOST - 
Selection of option “°’E” is necessary only when the 
system control has been passed to the MIS via a previous 
Pcommand f£0r it to ex@cute a program in its own memory. 


This option then allows the user to request the MDS to 
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terminate its present action and return control to the 


HOST in preparation for subsequent commands. 


**¥ Note that this option may not be effective if the 
program oveing executed in MIS memory runs aStray or 
never checks for or attempts to perform I/0 with the 
MOST. The only remedy in this situation is to manually 


reset the MDS. 


F. RETURN TO CP/M - 


¢ 


Selection of option “F will terminate use of the AMDS 
and return the user to the CP/M (or MP/M) operating 
environment. (The input of a control C as the first 
entry after any prompt will also accomplish the same 


min 2. ) 


GeeLOouNtOAL HGX FILE — DISK TO MIS - 

Option “°G” allows the user to download an INTEL Hex 
format file from disk to MDS memory. Hex files are 
normally generated in the course of the assembly 
process. 

** Note that only “HEX” file types are supported in this 
version and the system will not accept requests for any 
other types. 

When this option is selected, an option verification 
message is displayed and the user is prompted to input 


the filename. The entry of the filetype “HEX” is 
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optional but acceptable. Rules for acceptable filenames 
follow those set forth in CP/M documentation with the 
exception that ambiguous filenames (those containing 
?°s) are not accepted. Additionally, only the currently 
logged in disk drive will be used for disk I/0 and if 
the drive select code is entered with the filename it 
will be ignored if it fails to match that which is 


currently logged in. 


After the Hex file is successfully downloaded, a message 
to that effect will be displayed and the user will be 


returned to the menu. 


H. UPLOALT MTS MEMORY TO HEX LISK FILE - 
Option “H” is just the reverse of option °G’. Filename 
input is the same. After the filename is input, the user 
is prompted for the starting and ending addresses in MIS 
memory from which the contents are to be saved on disk 
in a “HEX” type file. Acceptable inputs are two 
hexadecimal numbers, tne first being less than the 


second, input in the same manner as in option ‘LD’ 
>493C E59F 


When the upload is completed, the user will be so 


informed and returned to the menu. 
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Po ERS /SEL MES MEMORY LOCATIONS) - 
Option “I” allows the user to examine and modify (set) 
Perc Onvents of Mio memory. Th= first prompt is for the 
Paecmea: Mis address to be @xeamined sucn as: >@BCS . The 
systen then fetches the data from that location and 


aeeplidys it as: 
BESO SA 


and waits for more input after the ‘3A’. If the user 
desires to change the data in that memory location, he 
may then enter the new data. The system stores the new 
data and automatically advances, examines and displays 
the next sedquential location in MDS memory. This process 
continues untii a period is the only data input. 
Mmaenormoditication of a mémory location is desired, a 
carriage return will cause an alvénce to the next memory 
ioeayLOn Without modifying the “IS memory. 

foe This option has the sare 1/0 format as the “S” 


command in IIT ** ) 


J. CONTINUOUS SET OF MDS M=MORY - 
Option “J° is similar to the examine/set option (‘I") 
except that it does not exanire the MDS memory, it only 
modifies it with sequential inrut data. The first input 
requested is the starting MCS address for modifications, 


i.@€. D>iSDA . The second and subsequent prompts are for 


48 





data to be entered into MIS memory, sequentially 
Starting at the address specified. Input data may be up 
to 255 characters long (including spaces and commas) for 
peoamele Line of input. if more than 255 characters are 
input, the system merely issues another prompt for a 
continuation line. Bach byte of data is separated by a 
Space or a comma. wWnen input is completed, a period 


entered after the promp: will terminate the option. 


mee ribp meso MEMORY Wi' H SPECIFIED BYTE - 

Option “°K” enables the user to fill any portion of MDS 
memory with a specifiec byte of data. The advantage of 
this is to allow the rser better knowledge of the 
Current contents OL fooee memory and= to help in 
identifying needed data during memory dumps to the CRT. 

The input expected afver the prompt are the start and 
ending MIS addresses followed by the data to be placed 


Pmeetumose locations. For example: 


>6395,7FTG,2A will fi111 MUS memory between, 
ani *‘ncluding, locations dgé9ou 
and 7FIDOH with data 2A, tre 


ASCII code for °’*’ 


( ** This option has the same input format as the ‘F° 


command in LIT ** ) 


49 





L. LOCATE BYTE SEQUENCE IN MIS MEMORY - 
Option “L° allows the user to search MIS memory for a 
sequential data seruence up to i6 bytes long. The first 
input prompted fcr is the search start address followed 


by an optional en” address as shown: 
2@825 SVOA or DF C23 


If no end address is given it will default to OFFFFE. 


The next prompt is for the byte sequence as: 
>G@ G3 45 »9A,CC eeoee Up LO ie bytes 


If the sequence is found, the starting address of the 
sequence in MIS memory is displayed. If not found, an 


appropriate message is also displayed. 


M. DUMP MIS MEMORY LOCATION(S) TC CONSOLE - 

Option ‘°’M” provides for a hexadecimal and ASCII MIS 
memory dump to the CRT. The only inputs required are the 
Start and optional end addresses for the dump in the 
same format as option “L’. If no end address is 
specified it defaults to the start address + 256. 

( ** The dump I/O format is the same as that for the “D’ 
command in DIT ** ) 

Meche miser os wisneS tO continue the dump after the 


initial dump completes, he may type in the letter “LT” to 
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dump the next 256 byte block. Any other input will 


return the user to the menu. 


** Note that unlike the [TIT dump command, the only way 


to abort a memory dump is by pressing the ESCape key. 


N. EXECUTE MDS MEMORY FROM A SPECIFIED LOCATION - 
Option “°N” allows the user to pass system control to the 
M©PS and let it execute a program in its memory. User 
mipuG re@uired is the MES start address of the program 
to be executed. After the address is input, the user is 
asked whether or not the program to be executed in MIS 
memory will be sending data to the dOST console for 
display. If the answer is no, then the user is returned 
to the menu. IF the answer is yes, then the HOST system 
loops waiting for data to display, until one of the 


conditions mentioned below is met. 


** Note that when this option is selected, the options F 
through N are disabled until the MIS returns control to 
the HOST; when the “ER” option is selected; or When the 


MDS system is manually resei. 


** For further discussion on the proper use of this 


option, see the section on “TIPS FOR MIS FROGRAMMING’. 
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5. INFORMATION OF GENERAL INTEREST 


a) The prompt for all user input is %>’ 


b) All inputs may be in either upper or lower case 


alphabetics. 


c) All input is terminated with either a carriage 


return or a line feed. 


d) All address and data inputs are expected to be in 
Mexmaaecimal notation, Address inputs contain from 1 to 4 


moxeaiegits and data inputs contain 1 or 2 hex digits. 


e) When inputting addresses and data, mistakes may 
be corrected in two ways: 1) by using the RUEFOUT key or 
backspace keys to delete input or 2) by Simply 
@omornuing to input the hex characters until tke correct 
ones are input. For addresses, the program always takes 
Ewes last four or less hex digits input and for data, the 
ime WO Or Less digits entered. At least one digit must 


be Entered for every required input parameter. 


f) A question mark °?° entered during input will 
cause the required input formats for each option to be 
displayed. When the display is completed, the currently 


SGetected option is restarted. 
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g) If the ESCape key is entered as input, the option 
is immediately terminated and the user is returned to 


the menu. 


h) The MCS is automatically reset at power-on but it 


is generally a good idea to manually reset it anyway. 


i) The MDS to HOST serial I/O port and the 
additional I/O port in the MPS are both initialized at 


every reset to operate at a 9600 baud rate. 
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6. TIPS FOR PROGRAMMING THE MDS 
a) If a program requires considerable communications 
with the user, the best terminal respvonse will be zained 
by using a separate CRT attached to the spare serial I/C 
port in the MIS. This port may be reprogrammed for a 
different baud rate if necessary (see the PRO-LOG dual 
UART documentation for detailed steps for programming 


channel B). 


b) rt the user does not wish to fool with 
programming the MDS channel B USART, but still nas the 
need for console I/O, his program may use the routines 
tieet into the monitor specifically for this purpose. In 
a manner similar to the BIOS calls used by CP/M, the 
user program may cali location Q@@@5H in the monitor for 
console I/O using the HOST console. The conventions for 


these calls is as follows: 


- for input from the HOST console the user program 
Should call MIPS address @905H with the function code @1H 
in register C; the character from the console will be 


returned in the Accumulator 


- for output to the console, a call is made to UZ5 
address @@@5H with the function code @2H in register C, 


and the character for output in the Accumulator 
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- to merely check to see if input has been received 
from the HOST, address @@€5H is called with function 
code @3H in register C ; if no character is waiting the 
accumulator will be returned = 20H, otherwise A = @FFH 


meaning input has been received 


- if a call is made to MDS address @O08@5H witk a 
mumetvion code in register C other then 01H, @2H or @2H, 
no I/O will take place and the C register will be 


returned with OFFdH 


** Two points should be remembered when using the 
Meal Console for 1/0: 

1) the data returned from the I/9 port is a full 
eight bits as received with no stripping of the high 
order bit for ASCII data 

2) when the console is to be used for user program 
I/O, be sure to answer yes to the query about console 


I/O when option “N° is selected 


c) if no I/O with the host console is necessary, as 
in a) above, the user program should at least 
Perwourcaliy check the HOST port status to see if it 
wants to terminate the execution of the user program. If 
data is waiting a call should be made as explained above 


to fetch the data so that the monitor can interpret it 


a0 





d) the user always returns control to the HOST via a 
jump to location 9@38H in MUS memory; a RST 7 


instruction will also accomplish the same thing 


e) do not forget that MDS user memory starts at 
location 4@0@H and all HEX files should be assembled for 


addresses above that location 
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7. SYSTEM ERROR MESSAGES 
System error messages are the result of either user 
maaeiaput errors or disk [1/0 errors. A list with brief 


explanations follows; 


Bevo ER INPUT ERRORS — 


INVALID MENU SELECTION - this message is displayed 


Moen an option is input which is not one of the 


selections from the menu. (* this error returns the user 





to the menu *) 


mOOweMANY OR TOO FEW CELIMITERS IN INPUT - used to 
indicate that too many or too few parameters were input 
than expected. Acceptable delimiters are a space ora 


comma. (* this error restarts the current option *) 


PERIOD ONLY PLEASE ! = given when a period is input 
to terminate input and the period is preceded or 
followed by other input data. Only a period may be 


input. (* this error restarts the current option *) 


INVALID HEX ITIGIT - an input of a non-dex digit (not 


in the range @-9, A-F) was attempted. (* this error 


restarts the current option *) 


Dir 








iets A OSLIMITER AT START OR END OF INEUT - 
Swoierc ad Space or ad comma was input as the first or last 
character in an input line. (* this errorestarts the 


emerent option *) 


TWO OR MORE CELIMITERS SEQUENTIALLY - too many 
delimiters were inserted between input parameters. (* 


this error restarts the current option *) 


AMBIGUOUS FILENAMES NOT ALLOWED - the filename which 


was input contained a “? . (* this error reprompts for 


new input *) 


COLON (:) NOT PROFERLY PLACEL IN FILENAME —- the only 
colon allowed in the filename is after the drive code 
and before the first letter of the filename. (* this 


error reprompts for new input *) 


FILENAME TOO LONG OR TOO SHORT - maximum filename 
length is 8 characters; minimum is 1. (* this error 


reprompts for new input *) 
HEX FILETYPES ONLY ! - only files of type °.HEX” are 


implemented in this version. (* this error reprompts for 


new input *) 
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NO SPACES ALLOWED IN FILENAME - filename characters 
must be sequential with no spaces. (* this error 


reprompts for new input *) 


NON-PRINTABLE CHARACTERS NOT ALLOWED IN FILENAME - 
only printable characters are allowed in filename. (* 


this error reprompts for new input *) 


START ALDRESS CANNOT BE GREATER THAN FINISH ALDLRESS 
swwm@en in the UPLOAD option, the user must specify MIS 
memory address boundaries for upload with the start 
address lower than the end address. (* this error 


restarts the upload option *) 


WARNING - ONLY CURRENTLY SELECTED CISK WILL BE USET, 
INPUT IGNORED ! - this version of AMDS does not allow 
disk drive specification unless it is the same as the 
fokescurrently logged in to the user. Other drive 
specifications are ignored and the option defaults to 


the currently logged disk. 


bedi 17/0 BRRORS - 


FILE NOT FOUND - the file specified cannot be found 


in the directory for download to the MDS. (* this error 


restarts the download option *) 


ao 





2 ee 


HEX CHECKSUM ERROR - a data error was detected while 
trying to download a HEX file. (* this error returns the 


user to the menu *) 


CLISK REAL ERROR - an attempt was made to read a disk 
file but was unsuccessful; check diskette media then the 


disk drive. (* this error returns the user to the menu 


Z) 


mureOF TIRECTORY SPACE - disk directory is full; 
delete files or use another diskette. (* this error 


returns the user to the menu *) 


OUT OF DIRECTORY OR DISK STORAGE SPACE - ran out of 
Space in one of these areas while attempting to write 
data to a disk; *** when this occurs, the data already 
written is deleted, i.e. NO PARTIAL files are saved ***, 


(* this error returns the user to the menu *) 
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Pepe Dex B 


Peovenenios POR HOST AND MDS USER OPTIONS 


SEL oh BE 


poor MENU 
SUC Lsie eda eys ILE) 
FLAG 


SETLON A 













SET “MENU 
SUPE RE ODEON 
FLAG 





MENU SUPPRESSION NOU MENUS SUPPRESSION 


SeLEeni] Dp 


GET 2 NO's 
CVRerO Bat 


DO ADD & 
SUBTRACT 


GVT TO HEX 
& DISPLAY 







OPTION C 





MENU 


BASIC INSTRUCTIONS HEX ADD/SUBTRACT 
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OPTIC E 


MENU 


RETURN CONTROL TO HOST 
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OPTION F 


PRET 
SIGNOFF 


CP/M(MP/M) 





RETURN TO CP/M 





DOWNLOAD HEX FILE TO MDS MEMORY 


OPTHON G 


GET 
FILENAME 


OEE LE 


eit 


NO 


MENU 


SEND MDS 
DWNLD CMD 


READ A 
pe RECORD 


SEND RL,LA 
& DATASMD 


YES NO 


OE 


eS 


Peer DS 
DONE 


(HOST FLOW) 


DWNLD 





(MDS FLOW) 
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PeeceTeE YE 
a 


( 


UPLOAD FROM MDS 


OPTION H 


CEe 
Pape NAME 


5 


NO 


ix ai 
NEW FILE 


p | 
try e 
~" 


(HOST FLOW) 


Wie LD 


GET START/ 
END ADDRS. 


SEND DATA 
EO SHOsSt 


rane 
t 


NaS 


MEMORY TO 


(MDS FLOW) 
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Bee Dok eer 


GET START & 
END ADDERS. 


Seo Urs 
CMD & ADDR 


TOSS 


GET DATA 
FROM MDS 


MA TA 
Foes §=8LO 
DISK 


Kort] 
© 
wv 
t3 
5 


ool 
*<, 


x 


CLOSe PILE 


MENU 


TE eee) L 
DONE 


MONITOR 


I 


0 





EXAMINE/SET MDS MEMORY 


OPTION I 


GET START 
ADDRESS 


re 
> 







GET NEW 
DATA 





SEND CMD & NO 
ADDR » MDS 
SEND DATA 
TO MDS 
GET DATA 
FROM MDS 
DISPLAY TELL MDS 
ae DONE 
MENU 
(HOST FLOW) 
GET NEXT 
MDS DATA 
GET START 
ADDRESS 
SEND DATA 
TO HOST 
ES 
MONITOR (MDS FLOW) 


YO 





CONTINUOUS MDs 


OPTION J 


GET START 
ADDRESS 


SEND CMD & 
START ADDR 






GET DATA 
FOR MDS 


aie 


Q 


O 


Sep) DATA 
TO MDS 


TELL MDS 
DONE 


MENU 


(HOST FLOW) 


MEMORY SET 






GET START 
ADDRESS 


GET DATA 
FROM HOST: 


Some, LT 








MONITOR 


(MDS FLOW) 





Pao omiemeony wlth SPECIFIED BYTE 


OF TLON Kk 


Get START & 
ND ADDR'S 

















GET ADDR'S 
& DATA 


FILL 
MEMORY 
ve 


S 
fae HOST 
DONE 

MONITOR 


ees FLOW) (MDS FLOW) 
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Poe ee eo LOURNCE IN MDS 


OPTION L 


GEL SiART/ 
ERD PADDR 'S 













Pring 
FOUND ADDR 


(HOST FLOW) 
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MEMORY 


LOCATE 


CET @apDR S 
& DATA 


DO SEARCH 


EQ. 
FOUND? 


OTE 


SEND 
FOUND MSG 


A 


MONITOR 


NO 







SEND NOT 
FND MSG 


(MDS FLOW) 





DUMP MDS MEMORY TO THE HOST CONSOLE 











GET/SEND 
START/END 
ADDR'S 





GET _MDS 
DATAS 
Pisriay if 


(HOST FLOW) 
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DUMP 


GET STARY 
END ADDR'S 


SEND DATA 
TO HOST 


yur 


ES 


Pei HOS. 
DONE 


MONITOR 


(MDS FLOW) 





EXECUTE USER PROGRAM IN MDS MEMORY 








GET wee. 
ADDRESS 


SEND CMD+ 
ADDRESS 










YES 





C, 





MENU 





(HOST FLOW) 


a I/O 
NO 


PERFORM 
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JUMP TO 
EXEC ADDR 


Sm eAG . 
COMPLETE 


MONITOR 


(MDS FLOW) 











APPENDIX C 


AMDS HOST CONTROL SOFTWARE LISTING 


FE BR BE OR HE BE IK IS BR ISO BE I OK OIE AE OS OK EE OK OK AE OK OE IE OES NE HS EE OE EE OE OI RE A OK OR AE OE EAS OK OS AES OS IO OR OK NS OK IE OE 


4¢ 


Separate code for the MES onboard monitor is listed 
under the filename AMIS1.ASM 

The AMDS user’s manual should be consulted for 
specifics not given in the documentation which follows. 


$¢ 


xe ¥e 
*f AMDS — ALTOS MICROCOMPUTER DEVELOPMENT SYSTEM x 
* CHOST CODE) sc 
* + 
PmemedqotiON 1.5, 28 MAY 1981 =" 
* LT. STEPHEN M. HUGEES - author ot 
¥ xe 
- jmemseis the HOsT (ALTOS) control code for the AMIS. * 
x 
x 
xe 
x 
3 


s é 
3 3& 3 


Be Ae ee ae He hc He oe Se he Se OE ae he ie OK AK ES OE BK OR OK OE FS AE OE OIE OR OE EO ENS EE SIE Ee AR AE IR OS IS AS 2 OS OC FI 3S AE TS IE OK 


ay 


ws 


org 12Oh 
CPM EQU GOOGH ;WARM BOOT RE-ENTRY TO CP/M 
BLOS EQU GOG5H sCOS ENTRY POINT 
MSTATPT EQU 29H sMES STO STATUS PORT 
MDATAPT EQU 28H sMDS SIO DATA PORT 
CONIN EQU ii ;CONSOLE INPUT FUNCTION 
CONOUT EQU 2 SCONSOLE OUTPUT FISNCTION 
PRISTRG EQU 9 SPRINT STRING TO CONSCLE 
REALDCON EQU 12 ;READ CONSOLE BPUFFER 
CONST EQU 11 ;CONSOLE STATUS FUNCTION 
OPENF EQU 15 SOPEN FILE #UNCTION 
CLOSEF EQU 16 SCLOSE FILE FUNCTION 
CELF EQU 1S SDELETE FILE FUNCTION 
READF EQU 20 >READ SEQUENTIAL FUNCTION 
WRITEF EQU at SWRITE SEQUENTIAL FUNCTION 
MAKEF ECU 22 sMAKE FILE FUNCTION 
CURRNTD EQU 25 SGET CURRENT DISK FUNCTION 
SETIMA EGU 26 sSET [CMA ALLIRESS FUNCTION 
CR EQU OLH sASCII CARRIAGE RETURN 
LF EGU GAB sASCII LINE FEED 
ESC EQU 1BH sASCII ESCAPE COLE 
COMMA EQU “x sASCII COMMA 
PERIOD EQU eis ;ASCII PERIOD 
SPACE EQU $ SASCII SPACE 
BKSPCE EQU @SH sASCII BACK-SPACE 
KON EQU 9118 sCONTROL 0 


Oa 





MINCHCE 
MAXCHCE 
BOF 


NHSTCML 
STACK 


STARTER 


MENU 


MENU@1 


MENUO11 


MENU@12 


MENUG13 


EQU 
EQU 
EQU 


QU 
KQU 


XRA 
OTA 
OTA 
LXI 


CALL 
XRA 
STA 
INR 
OTA 


MVI 
OTA 
LXI 
LTA 
ORA 
JNZ 
LXI 
CALL 
CALL 
CALL 
XRA 
CALL 
JNC 
el 
CALL 
CALL 
JMP 
INX 
[Gk 
JNZ 
LDAX 
ANI 
CPI 
JC 
CPI 
JC 
MVI 
JMP 
PUSH 
Gen 
JC 


“AS AND 1FH 
“N’+1 AND 1FH 
LAB 


6 
? 


A 
DlooLAT 
MENUSUPF 
D,SIGNON 


PRINT 


A 
MDSRDYF 
A 
MENUFLG 


A ,48 
CONEBUFF 
Seo uACK 
MENUSUPF 
A 

MENUSG1 
L,MENUMSG 
PRINT 
Svan O 
BUFFRI 

A 

SCAN 
MENU@11 
D,MFCELERR 
ene Ir 
TELAY 
MENU 

D 


B 
MENU@1i1 
D 


1¥H 
MINCHCE 
MENU@12 
MAXCHCE 
MENU@13 
pee 
BRROR 
POW 
NHSTCMD 
MENUO14 


We 


>MINIMUM MENU CHOICE 
MAXIMUM MENU CHOICE 

pCO Ouece— nN D OF FILE or 
> BUFFER INDICATOR 

sCURRENT NUMBER OF HOST CMIS 
>64 LEVEL STACK AVAILA3LE 


sINITIALIZE HOST IN CONTROL, 


sMENU NOT SUPPRESS ETL 
»>PRINT SIGNON ANU BASIC 
7 NST RUGTIONS 


T(iemlowmber EVERY TIME 


»sCEFAULT TO NO MENU 

» SUPPRESSION ON MENU ERRORS 
> OTHER THAN INVALIT CHOICE 
sINIT. CONSOLE REAL BUFFER 

> TO 48 CHARACTERS MAX 

jo eoAok  FOINTER 

sPRINT MENU? 


> NO 
»YES 


SRiISPRAY SFStemM STRPUS 

;GET MENU CHOICE 

;NO DELIMITERS ALLOWED 
;CHECK INPUT FOR DELIMITSRS 
; SCAN OK 

; INPUT ERROR (SYNTAX LIKELY) 


sTELAY TO REAL ERROR MSG 
;BACK TO MENU 

;ALL INPUT OK, POINT TO IT 
TAT RND OOF BUFFER YET? 

; NO, TRY AGAIN 

; ome “OPT DON 

;TELETE ASCII BIAS 
sTomonOlmen< A ? 

, Yue, MELUBGAL CHCICE 

-1S @MONCE VALID? 

; APPEARS TO BE 

; NO — PRINT ERROR MSG #1 


sOAVE OPTION 


sIF HOST CMD, MDS CONTROL 
> HAS NO BFFECT (EXCEPT 
“eit CMD) 





MENU@14 
MENUL 


MENUCH 


Peierowsumr TABLE MAY BE ADDED 


LDA 
ORA 
JZ 
LXl 
CALL 
JMP 


PoP 
STA 


CALL 


MOV 
MV 1 
LXI 
DAD 
TAL 
TAL 
me aL 
NOP 
NOP 


SOS Se wh 

4A 

MENUG14 
D,CNTRLMSG 
PRINT 

MENU 


PSwW 
MENUFLG 


MENUCH 


HOICE-3 


wid wm oO 


Semeomeo MENU CHOICES * 


CHOICE 


JMP 
JMP 
JMP 
JMP 
JMP 
JMP 


MENSUP 
NOMENSUP 
INST 
HEXARITH 
RONTZHST 
GEM 


* MDS COMMAND JUMP TABLE * 


JMP 
JMP 
JMP 
JMP 
JMP 
JMP 


aan t 
nei 


CWNLT 
UPLD 
EXAM 
CSET 
FILL 
LOCATE 


DUMP 
EXEC 


joel oh oo hALUS 


sHOST IN CONTROL 
s>MDS IN CONTROL 


sONLY ESCAPE WILL GET 

» CONTROL BACK 
sRETRIEVYE OPTION 

,OAVE CHOICE FOR USE IN 
> HSLPING USER LATER 
»>BRANCH TO APPROPRIATE 
» CHOICE 


sCOMPUTE MENU CHOICE VECTOR 


,CROLTCE VECTOR IS IN PC 


O FOR FUTURE EXPANSION UP * 


,OUPPRESS MENU 

7LO NOTSSUPPRESS MENU 

s INSTRUCTIONS 

jhe UM S&S TIFF. 
sRETURN CONTROL TO HOST 
sRETURN TO CPM 


sDOWNLOAL HEX FILE 

sUPLOAD HEX FILE 
;EXAMINE/SET MES MEMORY 
sCONTINOUS SET W/O EXAMINE 
;FILL MDS MEMORY 

sLOCATE EYTE SEQUSNCE IN 

; MDS MEMORY 

;DUMP MDS MEMORY 

sEXECUTE MIS MEMORY 


*** HOST COMMANDS ONLY - MDS DOESN’T CARE WHAT IS *** 


ee 6 AAPPENING 


Th AC OR 


* MENU SUPPRESSION * 


7S 








MENSUP 


* NO MENU SUPPRESSION (DEFAULT) 


MVI 
STA 
JMP 


NOMENSUP XRA 


Sees t — INSTRUCTIONS * 


LIS St 


INST1 


OTA 


CALL 


JMP 


LXl 
CALL 
CALL 
RRC 
JNC 
CALL 
JiWP 


A 


MENUSUPF 


MENU 


A 


MENUSUPF 


CRLF 
MENU 


L,INSTRUC 


PRINT 
CONSTAT 


PiNio1 
CONSIN 
MENU 


soSL MENJ SUPPRESSION FLAG 


we 
- 


»RESET MENU SUPPRESSION FLAS 


sPRINT INSTRUCTIONS 
sWAIT FOR RESPCNSE 


»LOOP 
»GET CHARACTHE 


* HEXARITH -— ALDITION/SUBTRACTION OF TWO HEXALECIMAL * 
* NUMBERS * 


HEXARITH LX! 


HEX1 


CALL 
CALL 
MVI 
CALL 
JNC 
MVI 
oir 
CALL 
SHLI 
CALL 
Hea 
MOV 
MOV 
LHLT 
TAL 
SHLD 
LHLD 
ORA 
MOV 
SUB 
MOV 
MOV 
SBB 
MOV 
PUSH 


C,HEXMSG 


PRINT 
BUFFRI 
A,l 
SCAN 
HEX1 
Lc 
ERROR 
GET4BIN 
Psi T 
GET4BIN 
SECOND 
Bape 

Gy 
Prot 


74 


sPFRINT VERIFICATION MESSAGE 


sGET INPUT 

sONE CLELIMITER HEQUIREL 
jeeaeck FOR IT 

> ALL LELIMITERS Ox 
sCELIMITER ERROR 


sGET FIRST NUMEER 

; OAVE IT 

»GET SECOND NUMBER 
5 SAVE IT 

+>BC = SECONT NUMBER 


sHL = FIRST NUMBER 
>HL = HL + BC 

sOAVE SUM 

sHL = FIRST NUMBER 
»>CLEAR CARRY 

sHL = HL — BC —- CARRY 











Ke MES 
* DWNLD 
CWNLD 


OPENOK 


RIFILE 


RECHT 


RECLEN 


POP 
LXI 
CALL 
LHLL 
PUSH 
POP 
LXI 
CALL 
LXlI 
CALL 
CALL 
OP 


B 


Hyak oGe+ 7 


CNVT16E 
Sy 
H 


B 
H,HEXMSG1 
CNVT16 
D,HEXMSG1 
Pree 
CRLF 

MENU 


6 


»BC = LIFFERENCE 
»CONVERT FOR PRINTING 


sNOW PREPARE SUM FOR 
> PRINTING 
»BC = SUM 


»>PRINT SUM & DIFFERENCE 


sRETURN TO MENU 


COMMANIS - INITIATED BY HOST IN ALL CASES *** 


- HEX FILE DOWNLOAD FROM DISK TO MDS MEMORY * 


LXI 
CALL 
CALL 
LXI 
CALL 
CP I 
JNZ 
MVI 
JMP 
MVI 
CALL 
XRA 
STA 
SEA 
LXI 
CALL 
LXI 


MOV 
CPI 
JZ 
INX 
CALL 
JMP 
MVI 
CALL 
ORA 
JZ 
STA 
MOV 
CALL 
CALL 


[L,DWNLIMS 
PRINT 
Cnr ni Len 
Dow 
OPENFILE 
255 
OPENOK 

ve 
ERROR 

i alee 

MES CMD 

A 

CONTFLG 
FIRSTIME 
H, DSKBUFF 
REALTSK 
H,DSKBUFF 


Aa 
RECLEN 
H 

BOFCK 
RECHT 
B,@ 
HEXBIN 
A 
CDWNLINE 
BUFFCNT 
C,A 
MCATAOUT 
GETSADK 


G 


fae. 


»sPRINT VERIFICATION MESSAGE 


sGET S&S CHECK FILENAME 
,OPEN FILE 


sFILE FOCUNT? 
> YES 
» NO, BRROR 

»SEND TOWNLOAT CML TO MICS 


sRESET CONTINUATION §& 
> FIRST THROUGd LCOP FLAGS 


;POINTER TO LISK BUFFER 
sREACL IN AS MUCH AS POSSIBLE 
SNOW CONVERT IT TO BINARY 6 
> SEND IT TO MIS 

sFINT °:° AS RECORI START 


>FOUNT IT 


SEND OF FILE/BUFFER? 

» NO, TRY AGAIN 

sINIT. CHECKSUM 

»GET RECORD LENGTH 

,1F RECLEN=0, THEN TONS 
» DONE 

»OSAVE THE RECLEN 

> NOT CLONE - SAVE RECLEN 
somNE LT TO MES 

>GET START ADDRESS 





RECLEN1 


HEXTATA 


DWNLDNE 


GETSADR 


CHECKIT 


Pinel Ms 
RECLEN1 
A 


Poot lie 
Seerenal 
PN oe 
ATLTROUT 


HEXBIN 
Hee IN 
MUATAOUT 
C 
HEXDATA 
CHECKIT 
H 

RECHT 
Sa T 

H 


B 


H,DWNDONE1+2¢ 


CNVT16 
FINISH 
BUFFCNT 


cA 


H,DWNDONE1+43 


CNVT16 


DT ,UWNTONE 


PRINT 
DELAY 
HOSTLONE 
MENU 


HuXBIN 
es 
HEXBIN 
h,A 


oEXBIN 
A 
B 


2G 


y1F FIRST TIME THROUGH LOOP 
IeooN DAVE ADDR ©OR LATEF 
HNOteeihsl) TIME 

sSET THE FLAG 


5 AND SAVE THE ADDRESS 
sOAVE OTHER LOAL ALIRS 
jones TO MLS 
»GET BUFFER PCINT#R BACK 
»IGNORE RECORLT TYPE 

»GET DATA BYTE 

pom PAR TO MDS 
»sLECREMENT RECORD LENGTH 
peers LO SET 

poses CKSUM IS OK 

sGET NEXT RECORI 


sGET STARTING LOAD ADDR 


;>PREPARE IT FOR PRINTING 


sNOW REALTY THE FINISH ATTR 
»GET RECLEN 


»>PRINT COMPLETION MESSAGE 


jtabb MES. LONE 


»GET STARTING LOAD ALDEESS 
> FOR RECORL 


LOALE ALL FakS 5S 
BUFFER POINTER 


9 HL 
LE 


»CHECK FOR CORRECT CHECKSUM 


sSHOULD Bs ZrkO 
» OK 








MVI 
JMP 


A,14 
ERROR 


* UPLE - HEX FILE UPLOAL 


MVI 
S18 
LxXlI 
CALL 
CALL 
LXI 
CALL 
CALL 
cr | 
JNZ 
MVI 
JMP 
CALL 
MVI 
CALL 
JNC 
MV I 
JMP 
CALL 
SHLI 
CALL 
SHLD 
XCHG 
LHLI 
MOV 
SUB 
MOV 
SBB 
JNC 
MVI 
JMP 
MV I 
CALL 
LHELD 
CALL 
LHLI 
CALL 
LXI 
MVI 
CALL 
CALL 
CALL 


UPLD 


UPLD@1 


UPLD1 


UPLI<2 


UPLIS 


CALL 
CALL 


At, izs 
BUSFCNT 
Pave EEMSG 
PRINT 
GETFILEN 
C,FCB 
DSLETE 
CREATE 
eae 
UPLDO1 
A,16 
ERROR 
BUFFRD 
Aer 
SCAN 
UPLD1 
Aye 
BRROR 
GET4BIN 
S aener 
GET4BIN 
ae GB Ey | 


START 

A,E 

is 

i a0 

H 

UPLI2 

mei 

ERROR 

Aa as 

MISCMD 

START 

ALLROUT 

FINISH 

ADDROUT 

H,DSKBUFF 
J 8 

BUFFCK 

WRITLEN 

WRITALIR 


WRITLDATA 
WRITCKS 


(SAVE) 


ca 


»CHECKSUM ERROR 


OF a iemsnOny 10 LISk * 


sINIT. BUFFER COUNT 


»>PRINT VERIFICATION MESSAGE 
GET FILENAME & CHECK IT 


»sDELETE ANY EXISTING FILE 
sCREATE A NEW FILE 

» CREATE OK? 

, £85 
> NO, OUT OF CTIRECTORY SPACE 
sGET ADDRESS INPUTS 

;ONE CLELIMITER ALLOWETL 


»SCAN OK 
>ERROR 


sGET MDS START & FINISH 
> BIER ESSES FOR UPLOAT 


»>CLE = FINISH ALLTRESS 
»CHECK FOR START > FINISH 


» OK 
jom@n ~BolART > FINISH 


;SEND UPLOAT cMr TO MIS 
;SEND START & END ADDRESSES 


»>STORE RECORD HEATER 


sSTORE RECORD LENGTH 
»STORE STARTING LOAT ALTR 
» & RECORD TYPE 

sGET ANT STORE LATA 
sSTORE CHECKSUM & CR,LF 








ne eee —— 





JMP 
WRITLN@1 XRA 

JMP 
WRITLEN MVI 


WRITLEN1 MVI 
CALL 
RET 
Beer tALTTR LIA 
CALL 


LTA 
CALL 
PUSH 
LHLL 
LXI 
DAD 
SHLT 
rer 
XRA 
CALL 
RET 
WRITDATA MVI 
WRITITA1 CALL 
LDA 
RRC 
JC 
CALL 
DCR 
RZ 
JP 
WRITDNE XRA 
CCR 
JZ 
CALL 
JMP 
WRTDIN@@1 CALL 
CALL 


LTA 
MOV 
CPI 
JZ 
WRITING1 MVI 
INX 
UCR 
JNZ 
CALL 
WRITINEL CALL 
LXI 
CALL 
CALL 
JMP 


UPLDS 

A 
WRITLENI 
Awa 


B,@ 
BINHEX 


S RAT 1 
BINHEX 
5 Pau 
BINHEX 
H 

S been T 
se 

D 


START 
H 

A 
BINHEX 


Care 
MS 1.N 
MUSRIY?F 


WRITINE 
BINHEX 
C 


WRITDTAL 
A 


C 

WRT DNOOL 
BINHEX 
WRITINE 
WRITCKS 
ARITEND 
BUFFCNT 
Pace 

128 
WRITINEL 
Mime F 

st 

B 
WRITINO1L 
WRITEDSK 
CLOSFILE 


C,UPLTONE 


PRINT 
TELAY 
MENU 


»DO ANOTHER HEX RECORD 
»WRITE LENGTH, ALTERNATE 

» ENTRY FOR ZERO RECLEN 
»ALL RECORDS HAVE RECLEN=16 
; EXCEPT THE LAST 

sINIT. CHECKSUM 

sCNVRT TO HEX ASCII & STORE 


sOlLORH RECORD START ATIR 


»SAVE BUFFER POINTER 


;BUME START ALLTR FOR NEXT 
Sele 


sRESTORE BUFFER POINTER 
»>STORS RECORD TYPE 


sDATA COUNTER 
»GET LATA FROM MLS 
sMORE LATA OR MIS CONE? 


eon 
sMORE CATA 

916 BYTES YET? 
» YES 

» NO, CONTINUE 


sFILL REMAINTER OF RECORL 
Pee 7 COS 


sSTORE CHECKSUM 
Poon Ast HeCORD 
sloeeueraR FULL? 


> LES 

; Nee Set neMATNE ER WITH 

; EOFs 

> LON wl Per FILL? 

; NO, CONTINUE 

| etsy wT EP RECORD TO DISK 
jOD@sme the FILS 

sPRINT COMPLSTION MESSAGE 








WRITCKS MCV 


WRITEND 


BUFFCK 


WRITEIT 


* EXAM — EXAMINE/SET MIS MEMORY 


EXAM 


EXAMO1 


EXAM1 


CMA 
INR 
CALL 
MVI 
CALL 
MVI 
CALL 
RET 
MV I 
CALL 
CALL 
XCHG 
LXI 
Sek C 
XCHG 
CALL 
CALL 
RET 
MOV 
INX 
LDA 
CCR 
JZ 
STA 
RET 
CALL 


LXI 
MVI 
STA 
RET 


LXl 
CALL 
CALL 
XRA 
CALL 
JNC 
MVI 
JMP 
CALL 
SHLI 
MVI 
CALL 
LHLL 
CALL 
CALL 
OTA 


A,B 


A 


BINHEX 


BUFFCK 


Buy ait 


BUFFCK 


er 


ees 
BUFFCK 
WrITLNG1 


H,@090H 
START 


Wee ALLER 
WRITCKS 


ye 
H 


BUFFCNT 


4A 


WRITSIT 
BUFFCNT 


WRITETDSK 


H,LSKEUFF 
Rakes 
BUFFCNT 


D,EXAMSG 
PRINT 
BUFFRD 


A 
SCAN 


EXAM@1 


Ayre 


ERROR 
GET4BIN 
START 
eX 
MDSCMD 
START 
ALDROUT 
MDSIN 
MISIDATA 


sOTORE CHECKSUM 
sGET NEGATIVE OF SUM 
» ATT ONE 


sSTORE CR,LE SEQUENCE AT 
» HEX RECORT ENT 


,I TORE LAST HEX RECORD 


sSTORE @O RECORD LENGTH 
9>Dn = BUSFER POINTER 
sOTORE OOOO LOAL ALTLTR S 
J ReCGRE Py Ph 

sHL = BUFFER POINTER 


,OSTOCRE CHECKSUM 
sO TORE LATA 
>I1S BUFFER FULL? 


jewo oa y Gs [tT ON LISK 
» NO, SAVE COUNT 


sWRITE 128 BYTE RECORI TO 
pe 

sHEINIT. BUFFER AREA 

» AND BUFFER COUNT 


LOCATION(S) * 
»>PRINT VERIFICATION MESSAGE 


sGET ADDRESS INFUT 

»NO LELIMITERS ALLOWEL 
»>CELIMITER CHECK 

» OCAN OK 

sINPUT ERROR (SYNTAX OR HEX) 


‘Gm STwWRT ADDRESS 
-ouMD HARM /SET CMD TO MES 
| Soi name SAL DwESS TO MES 


sGET DATA IN MDS MEMORY 
3 SAVE IT 














EXAM@20 


EXAM@2 


KEXAM2 


NOS aT 
Sat 


EXDONE 


Pup 
MOV 
LXI 
CALL 
EOF 
PUSH 
LXI 
CALL 
XCHG 
CALL 
CALL 
ORA 
JZ 
XRA 
CALL 
JNC 
MVI 
JMP 
CALL 
ORA 
JZ 
RAR 
JC 
MVI 
JMP 


CALL 
MOV 
JMP 
LTA 
CALL 
Bor 
INX 
dre 
CALL 
JMP 


A 

C,A 

pepe oGe +1 
CNVT8 

B 

B 

H,EXAMSG1 
CNVT1é 


PRINT 
BUFFRD1 


A 

NOSET 

A 

SCAN 
EXAM@2 
A,2 
ERROR 
Chern TOL 
A 

EXAM2 


EXDONE 
Ad 
ERROR 


GETZBIN 
eels 

SET1 

ol ele 
MCATAOUT 
A 

A 

EXAM1 
HOSTDONE 
MENU 


sOAVE ALTR. BEING EXAMINET 
»>C = MDSDATA 
>CONVERT LATA FOR PRINTING 


»GET ADDR. BACK, 
peony. LT 
»>CONVERT ALTITR. FOR FRINTING 


sleé = EXAMSG1 

sPRINT MIS ALTTR. & LATA 
sGET REPLACEMENT CATA 
(oloeOmiNeu!, THEN PUT OLE 
» LATA BACK 

»NO DELIMITERS ALLOWED 


; SCAN OK 

SINE UL ERROR 

sOTART OPTION OVER 

sIF INPUT WAS A PERIOT, 
» THEN DONE 

> N@ PERIOL, GET LATA 
etn ee ONE ¢ 

; (45S - ALL DONS 


Oeaepeneol topATA LS 
5 ILLEGAL, START OVER 


;OEND NEW DATA 

sGET OLD CATA 

;BUMP ADDRESS FOR SXAM/SET 
;GET MORE TATA FROM MIS 


sOITGNAL MDS DONE 
»BACK TO MENU 


* FILL — FILL MDS MEMORY LOCATION(S) WITH SPECIFIZD DATA * 


ETL 


FILL1 


LXI 
CALL 
CALL 


MVI 
CALL 
JNC 
MV I 
JMP 
CALL 
SHLD 


LT, 2TLLMSG 
PRINT 
BUFFRD 


Awe 
SCAN 
Pie! 
Ava 
ERROR 
GET4EIN 
START 
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SPRINT VERIFICATION MESSAGE 


»GET INPUT ADDRESSES + FILL 
> laa A 

sO LEDIMITERS REQUIRED 

> UCaCK FOR PREM 

; OCAN O4€ 

sJMP ERROR 

5 OTART OPTION OVER 

sGET START AITTAESS 

» oAVes TT 








CALL 
SH LL 
CALL 
MOV 
S18 
fav I 
CALL 
LHLI 
CALL 
LHLD 
CALL 
LTA 
CALL 
MVI 
OTA 
FILL2 CALL 
XRA 
OTA 
OTA 
JMP 


Moore 16 EIT ALERESS TO 


BPEROUT MOV 
CALL 
MOV 
CALL 
RET 


GET4BIN 
FINISH 
GET2BIN 
val 
CONSTATA 
Aged 
MDSCMD 
START 
ALLROUT 
FINISE 
ALLDROUT 
CONSIATA 
MDATAOUT 
Apa 
SooegAT 
MDSIN 

A 
SYSSTAT 
MDSRDYF 
MENU 


jor ioe 
MITATAOQUT 
A,L 
MCATAOUT 


9GET FINISH ADDRESS 
foe? LOO 

meee TLL PATA 

yA = DATA 

» SAVE IT 

Foe DP ieeCML TO MLS 
foie vee est LR. TO MES 
sSEND FINISH ADDR. TO MDS 
Paovoerieh LATA TO MIS 
»MIS IN CONTROL 


MDS DONE FILLING? 
j hs — CLEAR FLAGS 


sRETURN TO MENU 


MES - CALL WITH HL = ALILTRESS * 


shies FLRST 
mITZEN LSB 


»BACK TO CALLER 


pees — CONTINUOUS SET MDS MEMORY WITHOUT EXAMINE * 


CSET Lil 
CALL 
MVI 
OTA 
CALL 
XRA 
CALL 
JNC 
MVI 
JMP 
CSET@1L CALL 
SHLI 
MVI 
CALL 
ina LL 
CALL 
JMP 
ore | 1 CALL 
CSET11 GALL 


L,CSETMSG 
PRINT 
A,OFFH 
CONBUFF 
BUFFRD 
A 

SCAN 
CSETG1 
A,2 
ERROR 
GET4BIN 
START 
mec 
MDSCMD 
START 
ALLDROUT 
CSET11 
GRLF 
BUFFRD 
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SPRINT VERIFICATION MESSAGE 


sINIT. CONSOLE REAT EUFFER 
JO coomenaR nC TE RSaMA 7 
sGET START ADDEESS 

»NO LELIMITERS ALLOWEL 


5 SCAN OK 

she UL eeRROR 

sOTART OPTION OVER 
Dal eeome oME TO MLS 


sSEND START ALLRESS TO MOS 


;GET REPLACEMENT TATA TILL 
» BUFFER FULL OR <CRD 





CALL SCAN *>LOOK FOR BSCAPE 





CALL CKPERIOL ;CHECK FOR PERIOD IN INPUT 
ORA A 
i CSET2 ; NO PERIOL, GET CATA 
RAR 
aC CSETS ; PERIOD ONLY - ALL LONE 
MV I 4,2 SINPUT ERROR, 
JMP ERROR ; START OPTION OVER 
CSET2 CALL STAR SPRINT A LEADING STAR 
; PRIOR TO VALILATION LATA 
CSET21 CALL GET2BIN ;GET CATA 
MOV A,L 
GALL MLATAQUT sSENI If TO MIS 
MOV Gr 
KI H,DATAMSG +1 ;SEND IT TO CONSOLE FOR 
GALL CNVTS > VERIFICATION 
XCHG ;IE = ALDR. OF DATAMSG 
OALL PRINT 
| XCHG ‘DZ = CURRENT CONBUFF PTR 
MOV A,B SAT END OF BUFFER? 
CPI GFFH 
Jz CSET1 > YES, START OVER 
CPI BQ 
Jz CSET1 ; YES, START OVER 
IMP CSET21 ;NO, GET MORE [ATA 
Gomrs CALL HOSTLONE ;NO CATA TO SENT, SIGNAL 
; MDS DONE 
JMP MENU SRETURN TO MENU 


Seto en GOUTE MLS MEMORY FROM A SPECIFIEYD AITRESS * 


EXEC eX 1 ce oECcisG SPRINT VERIFICATION MESSAGE 
GALL PRINT 
CALL BUFFRD ;GET START ADDRESS 
XRA A sNO TELIMITERS ALLOWEL 
CALL SCAN 
JNC EX2C1 sasic A NumOKs 
MVI A 2 ; ERROR 
JMP ERROR ;START OPTION OVER 
Ewe 1 CALL GET4BIN ;GET START ADDRESS 
SHLI START oars It 
ek D,EXMSG ;SEE IF LATA FROM MES TO 
CAL PRINT ; CONSOLE OR NOT 
meeeil CALL CONSTAT ;WAIT FOR RESPONSE 
REC 
INC ene 1 ; LOOP 
ae CONSIN ;GET RESPONSE 
ORI 20H sFORCE TO LOWER CASE 
CPI “y ;CONSOLE INPUT FROM MDS? 
JINZ EXEC2 ; NO, SEND CML & RETURN TO 
; TO MENU 


Se 





EXECOZ2O 


GETINP 


EXECe 


LXI 
vALL 
MVI 
CALL 
LHLL 


CALL 
CALL 


MOV 
LTA 
ORA 
JNZ 
CALL 
JMP 
CALL 
RAC 
JNC 
CALL 
CALL 
XRA 
STA 
JMP 
nv I 
CALL 
LHLT 
CALL 
MY I 
oA 
gist 


D,EXMSG2 
PRINT 
ae 
MDSCMD 
START 


ATDROUT 
MISIN 


aA 
MORLEY Y 


A 
GETINP 


CONSOUT 
EXEC@2¢ 
CONSTAT 


SETINP 
CONSIN 
MEATAOUT 
A 
MDSRDIYF 
EXEC 822 
iar 
MDSCMD 
START 
ADLROUT 
A,1 
SYSSTAT 
MENU 


»GIVE ESCAPE MeTHODS 


ipower Gry TO MIS & 
LOOP WAITING FOR DATA 
One lONEerhOM VES OR ESC 
FROM CONSOLE 


“@@¢ we @6¢ we 


‘LOOP AT MESIN TILL ESC 
One (OuasOnuer A TA 

>SAVE DATA FROM MDS 
;SEE IF MES WANTS INPUT 


s YES 
; NO, SENT IT TO CONSOLE 


» WAIT FOR MORE 
»GET INPUT FROM KEYBOARD 


comme Lt TO MES 
sRESET MISRLY FLAG 


»LOOP AGAIN 
sOEND MES EXEC CML 


sOBNT START ALLTRESS TO MIS 
sSET MDS CONTROL FLAG 


»BACK TO MENU 


* LOCATE —- LOCATE A SPECIFIED BYTE SEQUENCE IN MDS MEMORY * 


LOCATE 


LOCATEL 


CALL 
LXI 
CALL 
MVI 
oA 
CALL 
XRA 
CALL 
JNC 


MVI 
CALL 
JNC 


MVI 
Jie 
CALL 
SHELL 


CLRBUFF 
D,LOCMSG 
PRINT 

A ,OFFH 
CONBUFF 
BUFFRI 

A 

SCAN 
LOCATE1 


fac db 
SCAN 
LOC@1 


A ,2 
ERROR 
GST4BIN 
5 Pasir 
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»CLEAR REAL BUFFER 
»sPRINT VERIFICATION MESSAGES 


sINIT. CONSOLE REAL BUFFER 
; TO 255 COIARACTORS MAX 
;GET ALLDRESS(ES) 

sANY DELIMITERS ? 


> NO, USE LTEFAULT FINISH 
» ALIRESS 
sMORE THAN ONE DELIMITER? 


; NO, GET OPTIONAL FINISH 
5 ADDRESS 

sMORE THAN 2 CELIMITERS 

> ERROR, START OPTION OVER 
‘GET START ADIRESS 











LOCZ1 


LOC1 


LOCDATA 





LOCS 


FOUNT 


Jie 


CALL 
SHLD 
CALL 
SHLD 
JMP 

LXI 

SHLD 
MVI 

CALL 
eee D 
CALL 
LHL? 
CALL 
ie 

PUSH 


LCCLATAL CALL 


CALL 
CALL 


LOCTATAe CALL 


MOV 
CALL 
MOV 
LXI 
CALL 
XCHG 
CALL 
XCHG 
MOV 
Gl 
JZ 


Geel 
JZ 


POP 
rCR 
ee 
JZ 


JMP 
CALL 
CALL 
OR1] 
oral 
JZ 
LX 
JMP 
LXI 


LOC1 


GET4BIN 
START 
GET4BIN 
FINISH 
LOCDATA 
d,OFFFFH 
FINISH 
ia 
MISCML 
START 
ADDROUT 
FINISH 
ALDROUT 
A,16 

PSW 
BUFFRI 
SCAN 
STAR 
GET2BIN 
Bed 
MEATAOUT 
ce 

A, DATAMSG+1 
CNVTS 


FE ReaNee 


ay 
OFFH 
LOCS 


OO 
LOCS 


PSW 
A 
PSW 
LOCS 


LOCLTATAe2 
HOSTRDY 
MISIN 

80H 

ope 

FOUNL 
C,NOTFOUNL 
BRKROUT 
L,FOUNIMSG 
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eNO COMMA MINI GH ALLRESS 
(livros tO rer nro — 

; GET LATA 

sGET START “ALTRESS 


eerie, cae FIN SH ALETRESS 


sOAVE LEFAULT FINISH ALLTRESS 
forNoenQCATE €Mp TO MDs 
sSEND START ALTLRESS TO MES 
Vion eALERESS TO MLS 


CMe Gowan 

» SAVE BYTE COUNT 
;GET SEAKCH SEQUENCE 
sLOOK FOR ESCAPE 
sPRINT A STAR 

sGET A BYTE 


some IT TO MIS 


> & TO CONSOLE FOR 
» VERIFICATION 


;AT END OF BUFFER? 


> YES, WAIT FGR SHAHCH 
> RESULTS 


jmeeto eet, POR SEARCH 

> RESULTS 

» NO, GET BYTE COUNT 
some Leo OT ¢ 

,OAVE BYTE COUNT 
peacoat POR SEARCH 

» RESULTS 

s NOT AT END OR 16 BYTES 
sTELL MDS TO SEARCH 

(cor Iwo RESPONSE 
»>LOOKING FOR ASCII 

sBYTE SEQ. FOUND? 

» YES 

sFRINT NOT FCUND MESSAGE 
> BACK TO MENU 

sPRINT FOUND MESSAGES 





CALL 
CALL 
MOV 
CALL 
MOV 
LAI 
XCHG 
CALL 
JMP 


PRINT 
MUSIN 

Bae 

MISIN 

C,A 

Bee NEMS 1 


PRINT 
MENU 


»GET FOUND ADDRESS MSB 
»GET LSB OF ATIR 
sCONVERT AITDR. FOR PRINTING 


»PRINT ADDRESS 
»BACK TO MENU 


Seo —- LUMP MIS MSMORY LOCATION(S) * 


Une CALL 
LKI 
CALL 
CALL 
KA 
CALL 
JNC 
MVI 
CALL 
JNC 


MVI 
JMP 
TUMP@1 CALL 
SHLD 
JM 
CUMP@18 CALL 
SHLD 
CALL 
aL 
Jar 
Uae 2 LHLI 
LXI 
DAD 
Shc: ABE 
RUMP < Mivel 
CALL 
LHLL 
CALL 
LHLD 
CALL 
LUMPS LXI 
PUSH 
CALL 
CALL 
MOV 
LDA 
ORA 
JNZ 


CLRBEUFF 
D,DUMPMSG 
PRINT 
BUFFRI 

A 

SCAN 
CUMP@1 
eee 

SCAN 
CTUMPS10 


A,2 
ERROR 
GET4BIN 
START 
LUMP1 
GET4BIN 
START 
GET4BIN 
FINISH 
DUMP2 
START 
B,@120H 
B 

FINISH 

ie DS 
MDSCMD 
START 
ALLDROUT 
FINISH 
ALDROUT 
L,LUMPMSG3 
D 
MSG3INIT 
MDSIN 
Gf 
MESRLYF 
A 
DUMPDONE 
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s;CLEAR REAU BUFFER 
»>PRINT VERIFICATION MESSAGE 


;GET ALLDRESS(ES) 
sANY LELIMITERS? 


3 NOQ 

;MORE THEN ONE CELIMITER? 
; NO, GET OPTIONAL FINISE 
» ALURESS 

sMORE THAN ONE DELIMITER 
jenn OR sealant OPTION OVER 
sGET START ATTRESS 


» NO COMMA 
sGET START ALLRESS 


9GET OPTIONAL FINISH ATITDR 
MAKE FINISH ALLRESS = 

7 woah +. 2oE 

oveebeMe CML TO MIS 

FO END San T ADDRESS TO MIS 
»SEND FINISH ADDRESS TO MIS 


sASCII LATA STORAGE 


sINIT. ASCII STORAGE 
sGET EYTE 


;MES LONB®TRANSMITING TATA? 


» YES 








MOV 
See 
LHLD 
MOV 
MOV 
LXI 
CALL 
XCHG 
CALL 
Mitel 
DUMFLATA POP 


LTA 
MOY 
Cel 
JNC 
CALL 
JMP 
Peet Ai OPI 
CNC 
ioe S TAX 
MOV 
INX 
PUSH 
LXI 


PUSH 
CALL 
XCHG 
CALL 
EOP 
TCR 
JZ 
CALL 
OTA 
MOV 
LTA 
ORA 
JNZ 
JMP 
SPERIOL MVI 
Re 
NXTLINE Lil 
CALL 
LXI 
LHLT 
LAT 
SHLD 
POW 
LTA 
ORA 


4,C 
MUSTATA 

> gre 

B,H 

Cie 
HRM SG 1 
CNVT16 


PRENT 
Bue 
D 


Meola Ts 
C,A 

eH 
Pens 1 
SPERIOL 
DE Dea 
808 

SP RRLOLT 
D 

A,C 

L 


D 
Heme MS G2 +1 


B 
CNVTS8 


eaN YT 
B 


B 
NXTLINE 
MISIN 
MISLTATA 
CiA 
MCSRLYF 
A 
NXTLINE 
CUMPLATA 
oe 


Peer MSGS 
PRINT 
B,@@12H 
SLA RT 


B 

See ee 

L 
MISRIYF 
A 
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» NO - SAVE LATA 
pee oben! AYORLSS 


sOSIATEEN BYTES PER LINE 
»RECALL ASCII TATA STORAGE 
» LOCATION 

»GET TATA 

plomea awe Cll PRINTABLE? 


> YRS 
joNO=— so Oan A PEAR TOL 


»>GREATER THEN ASCII 

» YES, STORE A PERIOL 

> seOnR DATA cas [5 
sRESTORE ORIGINAL LATA 
»>BUMP STORAGE ALDDRESS 

» AND SAVE IT 

yNOW CONVERT CATA TO HEX 
pene PRUNE 1T 

»SAVE COUNT 


»GET COUNT BACK 

pEGmetrno YET? 

» YRS 

» NO - GET NEXT BYTE 

»SAVE NEW CATA 

xMDS DONE TRANSMITING DATA? 


» YEO 

> NO — GET NEXT LINE OF TATA 
,OTORE A PERIOL IF NOT A 

> PRINTABLE ASCII CHAR. 
sPRINT ASCII CHARACTERS 


9GO TO NEAT LINE 

»>BUMP NEW LINE START ALLRESS 
> BY SIXTEEN BYTES 

» SAVE IT 

sGET GARBAGE OFF STACK 

> LONE? 





} 


— Sa 


[UMPIONE XRA 


JNZ 
CALL 
J MiP 


OTA 
CALL 
CALL 
XRA 
CALL 
JNC 
MV 1 
JMP 


[TMPCONS1 INX 


LUMPMORE LHLI 


CCR 
JNZ 
LTAX 
ORT 
cel 
JZ 


yMP 
INX 


SHLD 
JMP 


MSGSINIT MVI 


MSGS1 


CLRBUFF 


LXI 
MVI 
STAX 
DCR 
RZ 
INX 
JMP 
mv I 
LKI 
MVI 
JMP 


DUMPIONE 
CRLF 
DUMPS 

A 

Monee {© 
ChLF 
BUPFYRI 

A 

SCAN 
UTMPLONEL 
Age 
ERROR 

iB 

B 
DMPDONE1 
L 

eeu 


a & 


CUMPMORE 


MENU 
Priish 
H 
SlAnT 
aie 1 
Oy. e 


D,DUMPMSG3 


a 
9 


tJ tI td 


PMiSiGas 1 
Beso 


D,CONBUFF+1 


A,0@ 
MSG3S1 


>» YES 

sOTART NEW LINE 

»TUMP TILL LONE 

»>CLZAR MLS CONE XMITTING FLG 


»OTART NEW LINE 
sANOTAER LUMP? 
sNO CLeLIMITERS ALLOWED 


» SCAN OK 

»HRROR 

y soma OPTION OVER 
sPOINT TO ENT OF EUFFER 
> THERE YET? 

, NO, LOOP 


;CONVERT TO LOWER CASE 
foe Fun BGAIN FROM 
ee eof INTSH ALCR. 

» NO - RETURN TO MENU 
sMAKE FINISH+1 = NEW START 
» ALTRESS 

sLUMP 256 MORE BYTES 


Sit sao Gee rATA STORAGE 
> ARBA TO ALL $75 


sINIT. DONE 


;CLEAR CONSOLE READ SUFF 


>PUT IN ALL ZEROS 


Sao NTcHot — RETURN CONTROL TO HOST * 


KONT2HST LDA 


ORA 
JZ 
MVI 
CALL 
XRA 
STA 
LXI 
CALL 
CALL 
JMP 


SYSSTAT 
A 

MENU 
ne” 
MESCML 
A 
SYSSTAT 


L,ABORTEIM 


PRN 
DELAY 
MENU 


sGET SYSTEM STATUS 


; HOST ALREALTY IN CONTROL 
sOEND ESCAPE TO MDS 


sRESET SYSTEM STATUS FLAG 


sPRINT MLS ABORTEL VERIFI- 
» CATION 





*#** UTILITY SUBROUTINES 


= PRINT A STRING 
= CALL WITH LE 


PRINT 


Fuso 
PUSH 
Psu 
PUSH 
aT 
CALL 
Or 
mor 
FOP 
OE 
RET 


homiaw CONSOLE 


ste He 2k 


STARTING ALTIRESS OF STRING * 


Ee 

B 

i 

H 

Gris Lod RG 
pLOD 

H 

D 

B 

PSw 


sOAVE EVERYTAING 


ROUGc tear ince TO CONSOLL 


SRESTORE ALL REGISTERS 


»BACK TO CALLER 


Geer tots — LISPLAY SYSTEM STATUS * 


STATSYS CALL 


5 fol 


S1o0 


MOVESTR 


PoaNEMET  — PRIN? MENU PROMPT * 


CALL 
LTA 
ORA 
Lxl 
JZ 
LXI 
JMP 
LXI 
CALL 
LTA 
ORA 
LXl 
JZ 
Lxl 
JMP 
LxI 
CALL 
LXI 
CALL 
CALL 
RET 
MOV 
CPI 
RZ 
Spunk 
INX 
INX 
JMP 


CALF 

Ganeae 

Sr oon LT 

A 
BeoeoMsGtl5 
Sto 

H ,MDSMSG 
SYS Eto 

Aya Oot MoG 
MOVESTR 
MENUSUPF 

A 

D Sota oo 
Sasi 
H,YESMENMG 
Soto 

H ,NOMENMSG 
MOVESTR 
Peon oihlo G 
PRINT 
MENPMPT 


mie 
> 


L 
c 
H 
MOVESTR 


sama DYOTEM STATUS FLAG 


sHOST IN CONTROL 
sMDS IN CONTROL 

;PUT “MIS” IN MESSAGE 
sPUT “HOST” IN MESSAGE 


sGET MENU SUPPRESSION FLAG 


>NO SUPPRESSION 
» SUPPRESSION 


Poel Neo tors STATUS 


sPRINT MENU PROMPT 
s>RETURN TO CALLER 

sHL = STRING TO MOVE 

sCDE = LESTINATION ALTRESS 
sRSTURN [IF MOVE DONE 

» NOT TONE 


sMOVE NEXT CHARACTER 





MENPMPT LDA MENUSUPF sSUPPRESS MENU? 


ORA A 
JZ MENPMT1 » NO 
eae LE ,MENUPROL pets ee eR INIT OUPPRESEL 
CALL PRINT ; MENU PROMPT 
RET 
MENPMT1L LXI Y ,MENUPROM >PRINT UNSUPPRESSEL MENU 
CALL PRINT » PROMPT 
RET 


** ROUTINES TO GET AND CHECK FILENAMES FOR VALITITY ** 
“x ONLY INTEL “HEX” FILES ARE SUFPORTED BY THIS VERSION ** 


* GETFILEN - INITIATE CALLS FOR INPUTTING FILENAME ANT 
* MAKING APPROPIATE CHECKS * 





GETFILEN CALL CLRBUFF »>CLEAR CONSOLE INPUT BUFFER 
LKI cD ,FILENAME >PROMPT FOR FILENAME 
CALL PRINT 
CALL BUFFRD »GET FILSNAME 
CALL FILENCK »DO CEECKS ON FILENAME 
ORA A »ORE IF ANY ERRORS 
JZ GETFN1 y NO SHRORS 
CALL ERROR > ERRORS 
rr GETFILEN sOTART OVER 
GETFNi CALL MOVEN »>MOVE FILENAME TO FCE 
CALL UCASE sCONVERT ALL FILENAME 
RET » ALPHABETICS TO UPPER CASE 


* FILENCK — INITIATE ALL FILENAME CHECKS 
* RETURN A = @@ IF NO ERRORS 
a = ERROR NUMBER IF ERRORS IN FILENAME * 


Plieex CALL SCANQ ;SCAN FILENAME FOR °?° 
RRC 
INC FNCK1 ;NONE FOUND 
MV I A,7 *ERROR - NO AMBIGUOUS 
eo >; FILENAMES 
FNCK1I Aa SCANCOL ;CHECK FOR °:° ANE PROPER 
RRC >; LRIVE SELECTION 
JNC FNCK2 ;SCAN OK 
MVI A ,8 sTOO MANY COLONS 
RET 
FNCK2 CALL SCANUM ORC KomOR. TOO MANY OR TOO 
RRC * PEW CHARACTERS IN FILENAME 
INC FNCK3 ;NO ERROR 
MVI A,9 > ERROR 
RET 
FNCK3 eRIGF CKPERIOL SCHECK FILENAME INPUT FOR 
ORA A > A PERIOD 
IZ FNCK4 ;NONE FOUNL 


89 








CALL SCANHEX »ONE PERIOL, CHECK FOR 


RRC ; “HEX” FILETYPE 
JNC FNCK4 sFILETYPE OK 
MVI A,1@ sONLY “HEX” FILETYPES ARE 
RET seOUPPORTEL 

FNCK4 XRA A »CHECK FOR ESCAPE ANT 
CALL SCAN » OTHER DELIMITER ERRORS 
JNC FNCKS sNONE FOUNTL 
MVI eye »NO SPACES ALLOWET IN 
RET » FILENAME 

FNCKS CALL SCANINV »>CHECK FOR NON-PRINTABLE 
RRC » CHARACTERS IN FILENAME 
JNC ¥NCKE »NONE FOUND 
MVI Bile »ERROR 
R&T 

FNCK6 XRA A sNO BRRORS DETECTED 
RET » FILENAME OK 


tt 


SCANQ -— SCAN FILENAME FOR QUESTION MARKS INDICATING AN 





* AMBIGUOUS FILENAME 
* RETURN A = 9@ IF NONE FOUNL 
x = OFFH IF FOUND * 
SCANQ PUSH B 
PUSH =o 
PUSH so 
XCHG ;EL = BUFFER + 1 
MOV hy ;GET BUFFR COUNT 
SCANQG1 INX H . 
MOV AM ;LOOK FOR ‘? 
CPI ? 
ue SCANQ1 ;FOUND ONE 
DCR C ;KEEP LOOKING? 
INZ SCANQG1 ;SCAN NOT LONE 
KRA A ;SCAN LONE - NO ERRORS 
IMP SCANQ1+2 
SCANQ1 MMVI A, OFFA SAT LEAST ONE “2° FOUND 
POP H 
POP D 
POP B 
RET 


* SCANCOL -— SCAN FILENAME FOR A “:° THEN LOOK FOR PROPER 
Pal¥ieohieet COLE (ONLY CURAENT LTRIVE IN USE 
[S SUPPORTED, OTHERS ARE IGNORET) 

~ A “: IN ANY OTHER POSITION IN THE FILENAME IS 
NOT LEGAL 

02 IF NO ERROR 

OPRH IF AN ILLEGAL *: 


moun A 


zeke eH 


7 


Se OUND °- 


SCANCOL PUSH B 
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PUSH 
PUSH 
CALL 
ORI 
INR 
STA 
XCHG 
MOV 
INX 
INX 
DCR 
MOV 
CPI 
INZ 
be 
INR 
MOV 
ANI 
MOV 
LDA 
CMP 
Gh 
ia 
CALL 
CALL 
INX 
DCR 
IMP 
SCANCOL1 DCX 
INR 
SCNCOL11 MOV 
CPI 
He 
DCR 
TW 
INK 
DCR 
SCANCOL2 INX 
MOV 
CPI 
a 
[CR 
INZ 
SCNCOLDN XRA 
IMP 
SCANCOL3 MVI 
POP 
POP 
POP 
RET 


L 

A 
CURTSK 
40H 

A 
CURRENT 


as 


Peo mmo 
ve 


C2 ee w 


SCANCOLI 
d 


CURRENT 


E 
SCNCOL11 
D,DRIVERR 
PRET 
DELAY 

H 

C 
SCANCOL2 


vO 


CQ e¢ 
was 


ANCOLS 
CNCOLIN 


ve mamnan 


4 


SOANCOLS 

c 

SCANCOL2 

A 
SCANCOL3S+2 
A,@FFH 

H 

iy 

B 


joerc ume N. LISk 
;CONVERT IT TO A CHARACTER 


;OAVE IT 
»GET BUFFER COUNT 


7 


sSTHE ONLY °: WOULD BE HERE 


»NONE HERE 
POUND atte GHECK FOR 
7 CORRiol Ih iva 


sFORCE TO UPPER CASE 


»S AME? 

» YES, OK 

» NC, PRINT WARNING & 
» IGNORE IT 


»>CONTINUE SCAN 
sCHGCK TF ist CHAR IS ~: 


a 


> YES, ERROR 
» NO 
»SCAN DONE 


sSCAN NOT LONE 


o 


;SEE IF ANY MORE °: 


; YESS, ERROR 

» NO 

»CONTINUE SCAN 

»>DONE, NO ERRORS DETSCTED 


¢ ? 


»TOO MANY 














PB SCANHEX - SCAN FILETYPE FOR “HEX” 
* RETURN A 


SCANAEX 


SCANHX1 


COMPARE 


SCNHXER 


* SCANUM - SCAN FILENAME FOR TOO MANY OR TOO FEW 
x 


x 


* RETURN 
ok 


SCANUM 


PUSd 
PUSH 
PUSH 
XCHG 
MOV 
INX 
MOV 
CPI 
JZ 
DCH 
JNZ 
Jie 
INX 
MOV 
ANI 
Girl 
JNZ 
TNX 
MOV 
ANI 
CEI 
JNZ 
INK 
MOV 
ANI 
wel 
JNZ 
XRA 
A aie 
MVI 
POP 
ROP 
POF 
RET 


@@ IF FOUND 
GFFH IF NOT FOUND * 


E 
D 
H 


CM 

A 

A,™M 
PERIOD 
COMPARE 
C 
SCANHX1 
SCNHXER 


SCNHXER+2 
A ,OFFH 

H 

D 

B 


sGET BUFFER COUNT 
;GO TO PERIOL 


sFOUNT IT 

»KEEP LOOKING 
»sERROR, NO PERIOL 
;FORGS TO UPPER CASE 


» ERROR 


»>NO ERROR 


> ERROR 


CHARACTSRS 


FILENAME IS CHECKED ONLY (8 CHARACTERS MAX, 


A 


PUSH 
PUSH 
PUSH 
XCHG 
MOV 
MVI 


| | Me 


mow 


ERROR 


CHARACTER MINIMUM) 
OZ IF NO 
OFFH IF ERROR 


ze 


»GET BUFFER COUNT 


7B = # OF CHARACTERS IN =N 








SCANUM1 


SCANUM2 


SCANUM4 


SCANUMS 


INX 
MOV 
Cub 
JNZ 
DCR 
CCK 
JZ 

JMP 
oer 
JZ 

INR 
UCR 
JZ 

JMP 
XRA 
CMP 
JZ 

ay I 
CMP 
JC 

ARA 
JMP 
MV1 
POP 
LOE 
POP 
RET 


iY 


CANUMe 


Caw % 9. > fe 


SCANUM4 
SCANUM1 
PERIOL 
SCANUM4 
B 


G 
SCANUM4 
SCANUM1 
A 

B 
SCANUMS 
A,8 

B 


SCANUMS 


A 
SCANUMS+2 
A,OFFH 

H 

D 

B 


Tene COUNT aT ~:~? 

aS 

; NOC, START AT BEGINNING 
HONE Yur? 

eS 

; NO 

[cOmEOmPNAlOn GR BULFER ENL 
; PERIOL, LONE 

;KEEP COUNTING 


; LONE 
> LOOP 
> < 1 CHARACTER? 


VES dase Jas 
> > 8 CHARACTERS? 


7 Iho, BakOR 
> NO ERRORS 


> ERKOK 


* SCANINV - SCAN FILENAME FOR NON-PRINTABLE CHARACTERS 


3 


SCANINV 


SCANINI 


SCANIN2 


RETURN 


A = @@ IF NONE FOUND 
OFFH IF ANY FOUND * 


Pusu 
PUSH 
Ewen 
XCHG 
MOV 
INX 
MOV 
Cra 
JC 
CCR 
JNZ 
XRA 
JMP 
MVI 
POE 
ros 
POP 
RET 


B 
D 
H 


M4 


fl ©2 


AM 

20H 
SCANIN2 
G 
SCANIN1I 
A 
SCANIN2+2 
A , OFFA 
H 

ip 

B 


sGET BUFFER COUNT 


> < SPACE? 

> YES, ERROR 
»CTONE WITH SCAN? 
» NO 

> YES, NO ERRORS 


> ERROR 








* MOVFN - MOVE FILENAME FROM CONSOLE BUFFER TO FCE * 


MOVEN GALL PURGFCB sPURGE ANT SET UP FCE 
Lil H,CONBUFF+1 sGET BUFFER COUNT 
MOV CaM 
XCHG so = CONBUFF POINTER 
INX E 
INX D ores (ef Ss & COLON 
CCR C 
mx D. 
CPI 
a, MOVITO1 > LES 
CCX L ; NO 
INR C 
JMP Moy Lt sOTART AT BUFFER START 
movie lh INX L ;START FROM COLON 
DCR Gg 
Mow LT LXl H,FCE+1 
mevitTil LDAX iL »MOVE THE FILENAME 
CPI PERIOD > UNTIL FERIOD OR END 
> OF BUFFER 
RZ > LONE 
MOV Moa sOSTORE CHAR. IN FCB 
INX H 
INX E 
DCR C ,AT END OF BUFFER? 
KZ jeeetoew MOVE LONE 
Mie MOM TL 7 NO] beOFr 





* PURGFCB — PURGE FILE CONTROL BLOCK (FCB) AND SET IT UP 
* FOR ACCEPTING A FILENAME OF TYPE HEX * 


PURGFCB LXI H,FCB 
el D,FCBMSG 
MV I C,16 ;SET UP FIRST 16 BYTES 
 PURG@1 LDAX D 
MOV MA 
DCR C 516 BYTES DONE YET? 
JZ PURG1 ; YES 
INK 8 
INX D 
| JMP PURGO1 Oem hOOr 
PuRGt ‘LX L,FCB+32 SINITIALIZE CURRENT RECORE 
: XRA A ; BYTE IN FCR 
STAX D 
| RET 


* UCASE — CONVERT ALL FILENAME ALPHABETICS TO UPPER CASE * 


UCASE MVI C,8 98 CHARACTERS MAX 
LXI de CR 1 





UCASE@1 MOV 


UCASE1 


a FE Me 


HEXBIN 


CPI 
JNC 
CPI 
JC 

ANT 
MOV 
INX 
DCR 
RZ 

JMP 


Aee 
7BH 
UCASE1 
“a 
UCAS B1 
OLFH 
MA 

H 

C 


UCAS E@1 


ioe > LONER GAS b 92? 

» YEO, OK 

s NO, IS IT < LOWERCASE a? 
> YES, OK 

sMUST BE LOWER CASE 

» CONVERT IT TO UPPER CASS 


» DONE? 
» YES 
NOs Ole 


HEXBIN -— CONVERT TWO HEX ASCII CHARACTERS TO ONE EIGHT 
BIT BINARY NUMEER 


= AtsO ALL IT TO CURRENT CHECKSUM IN BE 


INX 
MOV 
CALL 
CALL 
RLC 
RLC 
RLC 
RLC 
MOV 
INX 
MOV 
CALL 
CALL 
ATT 
MOV 
ae 
MOV 
MOV 
RET 


dq 

I Si 
ROFCK 
ASCHEX 


Fy tsd 


Ait 
EOFCK 
ASCHEX 


m to toe! ty 
cj > 


CALL WITH HL POINTING TO FIRST CHARACTER 
RETURN BINARY NUMBER IN A * 


;GET FIRST LCIGIT 
sEND OF BUFFER/FILE? 
sCONVERT TO PURE HEX 
;MAKE IT 4 MSB’S 


;SAVE IT 
sGET SECOND LCIGIT 


sCONVERT IT 
sCOMBINE THEM 

» SAVE IT 

sALTL TO CHECKSUM 

y SAVE IT 

»GET BINARY NUMBER 


* ASCHEX - CONVERT HEX ASCII LIGIT TO PURE HEX LIGIT * 


ASCHEX 


Kt dt te HF 


KOFCK 


SL “9° 

CPI 12 

RC 

SUI ? 

RET 

- CHECK FOR 

- IF END OF 

- IF END OF 
THE FIRST 


BUFFER, 
CHARACTER IN A 
OTHERWISE, RETURN WITH NO ACTION * 


sSUBTRACT OFF ASCII EIAS 


»>NUMBER IS 8-9 
sNUMBER IS A-F 


END OF BUFFER/FILS 
FILE THEN CTOWNLOALT IS LONE 
KEAD MORE LISK & RETURN WITH 








EOFCK CPI EOF 


RNZ sNOT END OF FILE/BUFFER 
LDA CONTFLG SSEE IF END OF FILE 
RRC 
JNC DWNLDNE so Yen 
ex] H,CSKBUFF ; NO, REAL MORE 
CALL READSK 
mk I H,DSKBUFF 
MOV AM 
RET 
* BINHEX ~— CONVERT AN EIGHT BIT BINARY NUMBER TO TWO HEX 
* ASCII CHARACTERS 
* - STORE THE CHARACTERS IN MEMORY POINTEL TO BY GAL 
a8 - ADD BINARY NUMBER TC RUNNING CHECKSUM IN D 
* CALL WITH BINARY NUMEER IN A ANT HL AS ABOVE * 
BINHEX PUSH PSW 7Save DATA 
ALL B Tepe hoon okSUM 
MOV B,A Oem 
POP PSW 7Gu DATA 
MOV E,A ; SAVE IT IN E 
ANI OFOH 7oUeeeMSe S. INTO LSB S 
RRC 
RRC 
RRC 
RRC 
CALL HEXASC 1GONVEREeTO HEX ASCII 
Gan L BUFFCK ;Si@ne IT 
MOV A,E ;Gun DATA 
ANI OFH sNOW CONVERT LSE’S 
CAL HEXASC 
CAEL BUFFCK FoLORE IT 
RET 


* HEXASC —- CONVERT A BINARY NUMBER TO A HEX ASCII CHAR. * 


HEXASC CPI OAH 
JC NUMBER ;IT IS @-9 
ADI iG gle lO gta 
NUMBER ATI OOH sATD ASCII BIAS 
RET 


** DISK I/O ROUTINES ** 
** ATL ERROR COLES RETURNEL ARE IN ACCORDANCE WITH CP/M 
* ANID MP/M CONVENTIONS ** 


* READSK - READ THIRTY-TWO (32) 128 BYTE RECORDS FROM DISK 
* SET FLAG TO INDICATE IF ONLY A PARTIAL REAT * 


S6 





——— 


fee ok PUSH 
MVI 

REATSK1 CALL 
CALL 
Cre 
JZ 
CPI 
JZ 
MVI 

nEADMORE DCR 
JNZ 
MVI 


MVI 
STA 
Or, 
RET 
nEAUDNE XRA 
OTA 
PUSH 
LXI 
DAL 
EOE 
MVI 
POP 
RET 


SeWRITEESK — 


WRITEDSK LXI 
CALL 
CALL 
Gr I 
RZ 
MVI 
CALL 
CALL 
CALL 
SMP 


B 
Bae 


UMAS ET 
REATHEC 


4) 
REALMORE 


1 


READNE 


Ayo 
B 


READSK1 
M,5OF 


A,OFfFH 
CONTFLG 


B 


A 


CONTFLG 
B 


B »7128 
B 


B 


M,EOF 


B 


WRITE A SINGLE 


Havok RULE 
UMAS ET 
WRITEREC 
QB 


A,18 


ERROR 
CLOSFILE 
LELETE 


MENU 


128 


,OAVE E 

sRSAD Se RECORDS MAX 
sOBT CMA ALTLRESS 
»REALD A SINGLE RECORI 


»GOOD READ? 
» YBO, CLO I[T AGAIN 
» OF? 


» YES, DONG 

» NO, READY ERROR 

94K WORTH YET? 

» NO, READ MORE 
Pltoweotonse ows OF FUPFER 
» INDICATOR 

»SET CONTINUATION FLAG 


yRESTORE B 
sRESET CONTINUATION FLAG 


;POINT TO END OF LAST RECORD 


;ENSURE EOF MARKER IN BUFFER 
sRESTOKE ORIGINAL B 


BRE RECORD ATLOSLISK * 


sPOINT TO DISK BUFFER 
Foo LMA ALR ESS 

»WRITE RECORD TO TISK 
sGOOD WRITE? 

> YES, LONE 
jenopeOurwO! LISK SPACE 


;CLOSE THE FILE BUT 
DON SAVE A PARTIAL FILE 


Seoeentee— READ A SINGLE RECORLT FROM LCISK * 


READAEC PUSH 
PUSH 
PUSH 
LXl 
MVI 
CALL 
Oe 
oe 


mt o 


D,FCB 
C,REALF 


BIOS 
H 
L 





BOR B 
RET 


* WRITEREC - WRITE A SINGLZ RECORD TO DISK * 


WRITEREC PUSH B 
PUSH D 
PUSH H 
LXI EG 
MVI C WRITEF 
CALL BDOS 
OP H 
Or L 
Por B 
RET 


PeerASST — SET PMA ALDRESS 
* CALL WITH ADDRESS IN HL 
Sees UaN WITH HL = AL + 128 * 


EMASET PUSH 
PUSH 
PUSH 
PUSH 
XCHG 
MVI 
CALL 
BOP 
LXI 
DAT 
EOP 
EOP 
EOP 
R&T 


PSW 
B 
[ 
H 
;DE = DMA ADDRESS 
C,SETIMA 
BLOS 
H 
B,128 Ree SOMA ALLRESS FOR NEXT 
B ; Ti Me 
D 
B 
PSW 


* OPENFILE - OPEN A FILE CURRENTLY ON LOSK * 


OPENFILE PUSH 
PUSH 
PUSH 
Lxl 
MVI 
CALL 
POP 
EOP 
ROP 
RET 


B 

D 

A 

D,FCB 
C,OPENF 
BIOS 

H 

D 

B 


* CLOSFILE - CLOSE A FILE CURRENTLY ON DISK * 


PLOSFILE PUSH 


B 
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PUSH L 


PUSH H 

LXI E,FCsB 
MVI C,CLOSEF 
CALL BDOS 

POP H 

PO L 

Og B 

RET 


* CREATE -— CREATE A NEW FILE ON DISK * 
CREATE PUSH B 


PUSH LT 

PUSH A 

LXI D,FCB 
MVI C ,MAKEF 
CALL BIOS 
POP A 

POP L 

POP B 

RET 


* TELETE - LELETE A FILE CURRENTLY ON LISK * 
TELETE PUSH B 


PUSH D 

PUSH d 

LXI D,FCB 
Med C,DELF 
CALL BIOS 
EOP H 

POP D 

ror B 

RET 


* CURDSK - GET CURRENTLY LOGGED DISK * 


CURITSK PUSd B 


PUSH cD 

PUSH H 

LXI ee: 

MV I C,CURRNTL 
CALL BDOS 

FOL H 

POP L 

POP B 

RET 


* ERROR —- ERROR HANDLING ROUTINE 
* CALL WITH ACC = ERROR NUMBER * 
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ERROR 


ERRJMP 


ERROR1 


ERRORZ 


ERRORS 


ERROR4 


BRRORS 


ERRORG 


ERROR? 


MOV 
MVI 
LXI 
DAL 
DAD 
LAL 
PCHL 
NOP 
NOP 


JMP 
JMP 
JMP 
JMP 
JMP 
JMP 
ie 
JMP 


JMP 
JMP 
JMP 
JMP 
JMP 
JMP 
JMP 
J 
ae 
JMP 


LXI 
JMP 


LXI 
JMP 


LKI 
JMP 


Lif 
J MiP 


LXI 
JMP 


el 
JMP 


LXI 


IM pe 


RRJMP-3 


www Mw Oo 


ERROR1 
ERROR2 
ERRORS 
ERROR4 
ERRORS 
ERROR6 
ERROR? 
ERRORS 


ERRORS 

ERROR1G 
ERRORI1L 
ERROR12 
BRROR1S 
ERROR14 
ERRORIS 
SRROR1G 
ERROR1? 
ERROR18 


D ,MENERRMG 
ERROUT 


DL MFLELERR 
ERROUTI 


D,PERONLYM 
BERROUT1 


DL, INVHEXER 
ERROUT1 


[,SECELERR 
ERROUT1L 


D,SEQDELER 
ERROUT1 


D,AMBIGERR 


»GET ERROR NUMEER 
»COMPUTE ERROR VECTOR 


;ERROR VECTOR IS IN PC 


sMENU SELECTION ERROR 

;TOO MANY/FEW DELIMITERS 
;PERIOLI+LATA ERROR 

; INVALID HEX LIGIT ERROR 
sDELIMITER AT START/END 

;2 OR MORE LEL. SEQUENTIALLY 
;NO AMBIGUOUS FILES 

;COLONS NOT PROPERLY PLACED 
; IN FILENAME 

;TOO MANY/FEW CHAR. IN EN 
;PEX FILETYPE ONLY 

;NO SPACES IN FILENAME 

;NO NON-PRINTABLE CHAR IN FN 
;FILE NOT FOUND 

;SHEX CHECKSUM ERROR 

;CISK READ ERROR 

;OUT OF DIRECTORY SPACE 
;START > FINISH ALLDRESS 

;OUT OF LIR/LISK SPACE 

> PARTIAL FILE NOT SAVED 


;PRINT MENU ERROR MESSAGE 


»PRINT ERROR MESSAGE 








ERRORS 


ERRORS 


ERROR1IG 


ERROR1I1L 


ERROR1L2 


BRROR1S 


ERROR14 


WRRORIS 


ERROR1E6 


ERROR1L? 


ERKROR18 


ERKROUT 


ERROUT1 


ERROUT2 


BRROUTS 


JMP 


LXI 
JMP 


LXl 
wie 


Lil 
JMP 


LXI 
JMP 


LXI 
JMP 


LXl 
JMP 


LXI 
JMP 


LXI 
JMP 


LX1I 
JMP 


LXI 
JMP 


LXl 
JMP 


CALL 
CALL 
JMP 


LXI 


CALL 
LDA 
JMP 


CALL 
CALL 
R&T 


CALL 
CALL 


CALL 


ERROUT2 


C,COLONERR 
ERROUTe2 


D,FNCHARER 
EHROUT2 


LD, HEXFTERR 
ERROUT2 


T,SPFNERR 
ERROUT2 


D,NPRTERR 
ERROUTe2 


D,FNFNCERR 
ERROUT1 


CT CKSUMERR 
ERROUTS 


D,DSKRDERR 
ERROUTS 


Dee Phoeenk 
ERROUT 


LT ,SGFAERR 
ERROUT1 


D,DDSPCERR 
ERROUTS 


PRINT 
DELAY 
MENU 


SP,STACK 
DELAY 
MENUFLG 
MENUL 
PRINT 
DELAY 


ERINT 
DELAY 


PRINT 


»>PRINT ERROR 
»>LET USER READ ERROR 
sOTART OVER 


PRE-INIT. SACK 
»>PRINT ERROR 


>RECALL MENU CHOICE 
;RESTART CURRENT OPTION 


»>PRINT ERROR 
»BACK TO CALLER 
»>PRINT ERROR 





CALL HOSTIONE sTELL MUS LONE 
JMP MENU 


* DELAY - APPROX. 1-2 SECOND DELAY FOR USER TO SEE ERROR 
* MESSAGE BEFORE MENU IS REPRINTET * 


TELAY BUSH PSW 


Fuso B 

PUSH L 

Poo H 

MVI Dees ;OUTER LOOP INITIALIZATION 

LXI Da ;CECREMENT BY SUBTRACTION 
TELAYIN LXI H,SOEKCH s>INNER LOOP INITIALIZATION 
DELAYOUT DAD D »HL = HL - 1 

JC LELAYOUT 

TCR B 

JNZ DELAYIN 

EOr H 

re L 

EOP B 

ED PSW 

RET »DELAY LONE, BACK TO CALLER 


* CRLF - CARRIAGE RETURN & LINE FEED UTILITY * 


CRLF MVI eR *PRINT CARRIAGE RETURN 
Give L CONSOUT 
MV I Eas >; THEN A LINE FEEL 
CALL CONSOUT 
RET 
* ENTER - GET A HEX INTEGER FROM THE CONSOLE BUFFER 
* §& RETURN WITH HL = 16 BIT BINARY LATA 
* CALL WITH C = MAX NUMBER GCF CHARACTERS TO INPUT 
x [LE = CONSOLE BUFFER POINTER FOR START OF 
% CONVERSION PROCESS * 
ENTER PUSH PSW ;SAVE A, BC, DE 
PUSH B 
PUSH D 
ise H ,@OO0H sINIT. DATA AREA 
ENTER1 LDAX iP SGET DATA FOR CONVERSION 
CPI “a -IS If @-S? 
ic ENTERLS ‘ates 
ANI OLFH ; NO - FORCE TO UPPER CASE 
ENTERLS DAD H sSHIFT PREVIOUS DATA LEFT 
CAL H ‘a4 BITS 
DAL I 
DAD A 
Jc ENTER IF OVERFLOW, PKINT ERROR 
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ENTERZ 


ENTERS 


ENTER4 


* CONSIN -— CONSOLE INPUT ROUTINE 


crt 
JC 

ted 
JNC 
CPI 
JC 

ALT 
ANTI 
ORA 
MOV 
DCR 
JZ 

INX 
awl 
hiv i 


JMP 
Or 
fOr 
BO 
RET 


79° 
ENTERS 
an so 
ENTERS 
ah. 
ENTER2 
9 


OFH 
L 
Ie 


C 
ENTER4 
c 
ENTER1I 
A ,4 


ERROR 
L 

B 

PSW 


jive IT O-F? 

> NO - ILLEGAL CHARACTER 
91S IT > F? 

» YES - ILLEGAL CHARACTER 
Gee A | 

; NO - IT’S 9-9 

sADL CONVERSION FACTOR 
sISOLATE 4 BITS 

sMERGE WITH PREVIOUS LATA 


»COUNT CHARACTERS ENTERED 
sEXIT IF C = @ 

»>BUMP BUFFER ADDRESS 

sGET ANOTHER HEX INTEGER 

»>PRINT ILLEGAL CHARACTER 

» ERROR 

»OTART OVER 

sRESTORE REGISTERS 


* DOESN’T RETURN UNTIL INPUT IS RECEIVED * 


CONSIN 


PUSH 
PUSH 
PUSH 
MV I 
CALL 
Por 
EOP 
POP 
RET 


B 


L 
H 


C,CONIN 


BIOS 
0 
L 
B 


»OAVE REGISTERS 


>GET CHARACTER 
sRESTORE REGISTERS 


;RETURN TO CALLER WITH 
» CHARACTEA IN A 


* CONSOUT - CONSOLE OUTPUT ROUTINE 


* ENTER WITH CHARACTER IN 


CONSOUT PUSH 


PUSH 
PUSH 
PUSH 
MVI 
CALL 
POP 
se lOle 
POP 
FOr 
RET 


PSW 
B 
D 
A 


C ,CONOUT 


BDOS 
H 

LD 

B 
PSW 


,OSAVE REGISTERS 


;OUTPUT CHARACTER 


SRESTORE ALL REGISTERS 


»>BACK TO CALLER 








oe 
* 


SeNotAT PUSE 


xa 
* 
xe 
x 


Psi 
PUSH 
i 1 
CALL 
FOr 
Or 
HOP 
R&T 


B 


GOH IF 


CONSTAT - GET CONSOLE INPUT STATUS 
RETURNS WITH A NO CHARACTER WAITING 


@F¥FH IF CHARACTER IS WAITING * 


,OAVE RSGISTERS 


sGET STATUS 


sRESTORS REGISTERS 


BUF#RD - REAL CONSOLE INPUT INTO BUFFER POINTEL TO BY [E 


RETURN WITH LTE = BUFFER START ADDRESS + 1 


Beery PUSH 


PUSH 


BUFF 1 LXI 


CALL 
LX] 
Puls H 
MVI 
CALL 
CALL 
Oe 
INX 
LDTAX 
ORA 
JNZ 
JMP 


READONE MOV 


POP 
FOr 


R&T 


B = COUNT OF 


CHARACTERS INPUT 


ALL OTHER REGISTERS (A, HL) UNCHANGED * 


PSW ;SAVE A, HL 

H 

D,PROMPT ‘SEND PROMPT TO CONSOLE 
PRINT 

C,CONBUFF ;POINT TO CONSOLE BUFFER 
2 | SALT 

C,READCON ToD eCONSOLe INPUT 
BIOS 

CRLF 

D sPOINT TO CHAR. COUNT 

LC 

Dp sGET COUNT 

A eo COUNT  =meor 

REALONE ; NO, RETURN TO CALLER 
BUFFL joe CRY. ACA IN 

B,A ;RETURN WITH B = COUNT 
q sRESTORE A, HL 

PSW 


* BUFFRI1 - READ CONSOLE INPUT INTO BUFFER POINTET TO BY CE 


+H HT HF 


RETURN WITH CE 
B 


BUFFRI1 PUSH 


LXl 
PusH 
MVI 
CALL 


BUFFER START ADDRESS + 1 
COUNT OF CHARACTERS INPUT 
G6 IF COUNT = @ 

OFFH IF COUNT D @ 

HL UNCHANGED * 


A 


H »OAVE EL 

D,CONBUFF »>POINT TO CONSOLE BUFFER 
D » SAVE IT 

C ,REATCON »>REAL CONSOLE INPUT 


BLOS 
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CALL 
Oe 
INX 
LDAX 
ORA 
JZ 
MOV 
MVI 
JMP 


READONE1 MOV 


x 
a 
* 
* 
ps 
* 
« 
* 
¥ 
SCAN 


SCANI 


SCAN2 


CNTUEL 


Eo F 
RET 


REATONEL 
B,A 
A, OF FH 


REALONE1+1 


Bape 
A 


PO OUNT SiGe eran. COUNT 


»GET COUNT 

s1S COUNT = 0? 

» YES, RETURN TO CALLER 
»SAVE CHAR COUNT 

»COUNT > @ 


»>RETURN WITH B = COUNT 
sRESTORE A, HL 


SCAN — DELIMITER SCAN OF CONSOLE INPUT BUFFER 


(SPACES AND COMMAS ARES LEGAL [ELIMITERS) 
ALSO CHECKS FOR ESCAPE AND “?° KEYS 


CALL WITH 


ui E 
BUSH 
PUSH 
MOV 

XCHG 
MOV 

CALL 


CALL 
INX 
MOV 
CPI 
JZ 
Get 
JZ 
CFI 
JZ 
CE I 
JZ 
CCR 


JZ 
JMP 
UCR 


JMP 
SCANTONE XRA 


SCANDI 


CMP 
Or 


DE = CONBUFF + 1 


A = NUMBER OF [TELIMITERS TO LOOK FOR 


td tit 


»A 
CM 
SCNENDEL 
SCANDDEL 
H 

A,M 
SPACE 
CNTDEL 
COMMA 
CNTDEL 
ESC 
SCANESC 
2 
QUESTION 
C 


SCANLTONS 
SCAN 

B 

SCAN2 

A 

B 

H 


RETURN WITH CARRY SET IF MORE OR LESS VELIMITERS 
THAN SPECIFIED 

= GARBAGE 

OTHER REGISTERS UNCHANGED * 


sOSAVE REGISTERS 


»GET DELIMITER COUNT 

sHL = CONBUFF + 1 

»GET CHARACTER COUNT 

»>SCAN FOR DELIMITERS AT 

> START ANI ENT OF INPUT 
»SCAN FOR SEQUENTIAL UXLS. 
»GET CHARACTER 


»IS IT A SPACE? 

» YES, DEC DELIMITER COUNT 
pice Be TGOMMA s 

» YES 

91S IT AN ESCAPE CHARACTER? 
» YES, BSCAPE FROM OPTION 
sloeit ASQUEST FOR HELP? 
ey orn DE TA FORMATS 
»NONE OF THESE, CHECK NEXT 
» CHARACTER 

»>NO MORSE CHARACTERS TO CHECK 


»>LECREMENT DELIMITER COUNT 
>LOOK FOR ANOTHER DELIMITER 
»SEE IF B = @ 


sRESTORE REGISTERS 








POP E 
POP B 
RET 
SCANESC LIA MENUFLG -IF HOST COMMANT THEN 
CPI NHSTCML New EScAme TO MES 
ue MENU 
LDA SYSSTAT :SEE IF HOST IN CONTROL 
ORA A 
ns SCNESC1 ;HOST IN CONTROL 
CALL CNTRLCK sMis Leen CONTROL 
RRC 
JNC MENU ; NO ABORT 
SCNESC1 MVI A> ; ABORT 
CLL MDS CMD 
XRA A SCLEAR SYSSTAT FLAG, HOST 
STA SYSSTAT ; NOW IN CONTROL 
JMP MENU ;SRETURN TO MENU 


QUBSTION LklI 


D ,FORMTMSG 


>PRINT DATA FORMATS ANT 


CALL PRINT > RETURN TO CURRENT OPTION 
QUEST1 CALL CONSTAT ;WAIT FOR RESPONSE TO 
RRC >; CONTINUE 
JNC QUEST1 
CALL CONSIN 
fel L,FMTMSG1 SCONTINUE FORMAT MESSAGE 
CALL PRINT 
SGeste Cw#LL CONSTAT 
RRC 
INC QUEST2 
CHSLL CONSIN 
LDA MENUFLG 
JMP MENU1 ;BACK TO OPTION 
CNTRLCK LXI D,ABORTMSG ; MDS IS — PRINT ABORT QUERY 
CALL PRINT 
CNTRL1 caLL CONSTAT ;WAIT FOR RESPONSE 
RRC 
INC CNTRL1 
Cisse. CONSIN ;GET RESPONSE 
ORI 20H *FORCE IT TO LOWER CASE 
CPI ca sABORT MDS CONTROL? 
Jz CNTRL2 ; YES 
XRA A >; NO, CLEAR A 
RET 
CNTRL2 MVI A,OFFE UST A 
RET 


* SCNENDEL - CHECK FOR DELIMITERS AT FIRST & LAST CHARACTER 
. POSITIONS IN CONSOLE INPUT BUFFER 
* CALL WITH BUFFER COUNT IN C * 
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SCNENUDEL PUSH B sOSAVE BUFFER COUNT 
INX Hq »GET FIRST CHARACTER 
MOV Aven 
CPI SPACE (ioe Peake MCh? 
JZ SCNSPC1 jie od orn R 
CPI COMMA joel Se COMMA ? 
JNZ SCNSPC2 » NC, CONTINUE TO ENDL 
SCNSPCi MVI A,95 > KRROR 
JMP ERROR 
SCNSPCe CCR C ;AT BUFFER END YET? 
JZ SCNS PCS » YES 
INX H » NO 
JMP SCNSPC2 » LOOP 
SCNSPC3 MOV AM >GET LAST CEARACTER 
CPI SPACE 9A SPACE? 
JZ SCNSPC1 > YES, ERROR 
Grr { COMMA »A COMMA? 
JZ SCNSPC1 > YES, ERROR 
BOF B sRESTORE BUFFER COUNT 
LXI H,CONBUFF+1 ero gk LO LT 
RET 


* SCANTTEL - SCAN CONSOLE BUFFER FOR 2 OR MORE SEQUENTIAL 
es DELIMITERS * 


SCANT DEL PUSH B sOSAVE BUFFER COUNT 


KRA A sINIT. FIRST LELIMITER FLAG 
STA FRSTDEL 
STEL1 INX B ;GET CHARACTER 
MOV A.M 
CPI SPACE ; SPACE? 
JZ LELCK ; YES, FIRST LELIMITER? 
CPI COMMA ; COMMA? 
JZ DELCK ; YES, FIRST DELIMITER? 
[CR E ;IF C = @ THEN LONE 
JZ STELINE 
XRA A ;RESET FLAG 
Sie FRSTLEL 
JME SDEL1 ; LOOP 
DELCK LDA FRSTDEL ;FIRST DELIMITER? 
ORA A 
INZ DELCK1 ; NO, A=1 - ERROR 
INR A ; Ys, SET PRSTDEL FAG 
STA FRSTLEL 
DCR c ;SEE IF LONE 
JZ SDELDNE 
JMP Said ; NO, LOOP 
DELCK1 XRA A 
STA FRSTDEL 
MVI A,6 
JMP ERROR ;PRINT ERROR 








SDELDNE POP 


% 


*% Ht He 


LXI 
RET 


CALL WITH 
RETURN WITH A 


ck 


CKPERIOD PUSH 


CKPER1 


PERFNT 


NOEER 


CKLTONE 


% 


HH Hee HER HH 


PUSH 
PUSH 
XCHG 
MOV 
MOV 
INK 
MOV 
Cr T 
JZ 
TCR 
JZ 
JMP 
MOV 
CPI 
JZ 
MV I 
JMP 
MVI 
JMP 
KRA 
POP 
EOP 
EOP 
RET 


B 


H,CONBUFF+1 


»>RESTORS BUFFER COUNT 
» AND POINTER TO IT 


CKPERIOD - CHECK FOR A PERIOD ANYWHERE IN INPUT 
CONBUFF + 1 

OO IF NO PERIOL FOUNTL 

OFFH IF A PERIOD ONLY 

OFOH IF A PERIOL + CATA 


OTHER REGISTERS UNCHANGED * 


moo 


C 

CKDONE 
CKPER1 
aL 

1 

NOERR 

A ,OFGH 
CKCONE+1 
A ,OFFH 
CKLONE+1 


thd OI PQ 


sOAVE REGISTERS 


»HL = CONBUFF + 1 

»C = CHARACTER COUNT 
»>D = CHAR. COUNT ALSO 
»GET CHARACTER 


plot A PERTOL? 

» YES 

> NO, ANY MORE CHARACTERS? 
» NO, CHECK LONE 

> YES, TRY AGAIN 
sRECALL ORIG. CHAR. 
sONLY A PERIOTL? 

» YeS, NO #RRCR 

> EER TOL + TATA 15 ILLEGAL 


COUNT 


>PERIOD ONLY INDICATION 


>CLEAR ACC., NOT FOUND 
»RESTORE REGISTERS 


GET4BIN - GET 4 OR LESS HEX INTEGERS FROM THE CONSOLE 


BUFFER AND CONVERT THEM INTO 16 BIT BINARY LATA 
(GO INTO BUFFER, GC TO DELIMITER IF ONE EXISTS 
OR TO BUFFER ENT, WHICHEVER OCCURS FIRST; 

BACK UP NUMBER OF CHARACTERS SPECIFIED EY 


CALLER OR TO DELIMITER OR BUFFER+1, 


CONVERT 


TO BINARY ANI RETURN) 
= START OF CONVERSION POINTER (AT A 
DELIMITER OR THE BUFFER COUNT) 


CALL WITH UE 


RETURN WITH B 
C 


Du 
HL 


NUMBER OF CHARACTERS LEFT IN BUFFER 
NUMBER OF CHARACTERS CONVERTETL 

END OF BUFFER OR DELIMITER 

16 BIT BINARY LARA * 








7 a 


GET4BIN MVI 


GET41 


MOV 
STA 
XCHG 


GET4LOOP INX 


BACKUPS 
BACKUP 


MOV 
ce 
JZ 
CPI 
JZ 
TCR 
JZ 
JMP 
INX 
PUSH 
DCX 
CALL 
JZ 
MOV 
Gra 
JZ 
Ge I 
JZ 
CCR 
JNZ 
plea 


BACKUPG1 INK 
BACKUP1 MYVI 


BUFFTST 


eH KK KH 


SUB 
MOV 
XCHG 
CALL 
POP 
DCR 
RET 
PUSH 
PUSH 
LXI 
MOV 
CMP 
Por 
Bor 
RET 


GETZBIN - SAME AS GET4BIN BUT 


MAX 


C,4 
a 3G 
BACKUPi+1 
H 

AM 

SPACE 
BACKUP 
COMMA 
BACKUP 

B 


BACKUP@ 
GET4LOOP 
H 


H 

A 
BU 2 
BACKUP@1 
A,M 

5 Pac k 
BACKUF@1 
COMMA 
BACKUP@1 
C 


SACrer +i 
BACKUP1 
H 

A,4 

C 

C,A 


ed 
=. 
3 
ts 
a 


ONBUFF+1 


=» 6! 


C 
L 


Mo Brow wa td ty 


SAME ENTRY PARAMETERS 
RETURNS WITH L = 8 BIT BINARY LATA 
OTHER REGISTERS AS IN GET4BIN * 


»GET 4 CHARACTERS MAX 
»BE SURE BACKUP1 INST IS 
» MVI A,4 

»>HL = START OF SEARCH 
»GET CHARACTER 


91S IT A SPACE? 


» YES 

pista COMMA? 

eS 

s>MORE CHARACTERS IN EUFFER? 
» NO 


>NONE OF THESE, TRY AGAIN 
sPOINT TO BUZFER ENT + 1 
sOAVE LELIMITER ALLRESS 
»>BACK UP 1 

»AT BEGINNING OF BUFFER? 
» NO 
;ARE WE AT A SPACE? 
» YES 

»ARE WE AT 
» YES 
»>DECREMENT CHARACTER COUNT 
»>BACK UP 1 AGAIN 

»>C = O@ FINALLY 

»POINT TO FIRST CHARACTER 
sFINALLY GOT TEERE 
»>COMPUTE NUMBER OF BACKUPS 


A COMMA? 


>DS = CONVERSION START ADDR 
»>LO CONVERSION 

»9DE = LELIMITER ALCIRESS 
»>DECREMENT CHAR. COUNT 


»AT BUFFER+1i YET? 


»IF Z = 1 THEN AT BUFFER+1 


> ELSE Z = @ 


LIMITED TO TWO CHARACTERS 








GaT2BIN MVI Griz 


MOV Ae. C ;TWO BACK-UP‘’S ONLY 
STA BACKUP1I+1 [MOLI FY GEP4ARIN COLE 
CALL GET41 

MVI ae ;RESTORE GET4EBIN COLE 
Sy. BACKUPi+1i 

RET 


feeesouL — HOST OUTPUT TO MIS 
* CALL WITH CHARACTER IN A * 


MDSOUT PUSH B Son Ben lol BRS 
PUSH [ 
PUSH H 
MOV C,A ;SAVE CHARACTER 
MOSOUT1 MVI A ,16H piowoneo tO INT BIT 
OUT MSALET 
IN MSTATPT »GET SIO STATUS 
ANI OCH sCHECK FOR BOTH LTR & TRE 
CPI SCH » MUST HAVE BOTH 
JNZ MDSOUT1 »LOOP TILL READY 
MOV A,C 
OUT MUATAPT ;OEND CHARACTER 
CP i XON ;IF KON, DON’T WAIT FOR 
JZ XONIN » CONFIRMATION 
XONCK CALL MUSTAT sNOW WAIT FOR CONFIRMATION 
RRC 
JNC XONCK ; “SE ROM MBS 
IN MCATAPT sGET IT TO RESET SIO FLAGS 
XONDN EOP al sRESTORE REGISTERS 
POP L 
ON B 
RET 


* MIESCMD - SEND COMMANT TO MIS 
* CALL WITH A = COMMAND * 


MDSCMD PUSH PSW »OSAVE COMMAND 
MVI A ,O558 »NEXT CHAR. WILL BE CML 
CALL MUSOUT 
ony PSW »O END COMMAND 
CALL MISOUT 
on 


* MDATAOUT - SEND USABLE DATA TO MDS 
* CALL WITH A = TATA * 


MTATAOUT PUSH PSW »OAVE LATA 
MVI A ,OFFH sNEXT CHAR. WILL BE DATA 
CALL MITSOUT 
POP PSwW ,OEND LATA 


ioe 











» SAVE IT 


»RESTORE LATA 


ji HOSTRIY - HOST REALY TO RECEIVE RETURN TATA FOR CURRENT 


HOSTRDY 


PUSH PSW 
CALL MCSOUT 
POP PSW 
RET 

OPTION * 
MV I A ,@OH8 
CALL MCTSOUT 
MVI A, OOH 
CALL MDSOUT 
R&T 


yNEXT CHAR. IS RDY FLAG 


»SEND READY FLAG 


* HOSTDONE —- HOST LONE WITH ITS PART IN CURRENT OPTION, 
* 


HOSTLDONE MYVI 


SeetorN — HOST INPUT FROM MCS 
* RETURNS WITH CHARACTER IN A, 


MISIN 


MOSQUIT 


MDSIN2 


CALL 
RET 


PUSH 
PUSH 
PUSH 
CALL 
IN 
CPI 
JZ 
CPI 
JZ 
JMP 


MVI 
CALL 
CALL 
IN 
XRA 
STA 
OTA 
MVI 
CALL 
JMP 
MVI 
CALL 
CALL 
IN 
PUSH 


Ae 
MDSCMD 


EP 

D 

A 

GILS INRDY 
MDATAPT 
O¥¥FA 
MDSINe 
GS5H 
MUSQUIT 
MUS ININE 


A,XON 
MDSOUT 
MISINRIY 
MCATAPT 
A 
SfosraTt 
MISRIYF 
A,XON 
MISOUT 
MENU 
A,XON 
MES OUT 
MUSINRDY 
MDATAPT 
PSW 


IS RETURNING TO MONITOR * 


»sNEXT CHAR. IS TONE CMNT 


OTHER REGISTERS RESTORED * 
,OAVE REGISTERS 
sANY INPUT WAITING FROM MIS? 


> YES, GET DATA TYPE 
715 IT LATA? 


; Vio ake it 
CULE SOMD? 
» YES 


» NO, MUS MUST HAVE 

5; SIGNALLED IT’S READY 
» FOR INPUT 

»>CONFIRM RECEIPT 


sRESET FLAGS 


SCONFIRM RECEIPT OF ’Q° 


>NOW BACK TO MENU 
,OSEND CONFIRMATION 


swale @OR CATA 
» THEN GET IT 
» SAVE IT 





MVI 
CALL 
Poe 
OP 
POP 
Orr 
RET 


A,XON » CONFIRM AGAIN 

MDSOUT 

PSW >RESTORE LATA & REGISTERS 
A 

D 

B 


* MDSINRDY ~ CHECK FOR INPUT FROM MDS, LOOP TILL THERE IS * 


MOSINRDY CALL 


CALL 
RRC 
JNC 
RET 


ES CK »CHECK FOR ESCAPE 
MDSTAT »GET STATUS 
MISINRDY sNO CHARACTER WAITING, LOOP 


»>CHARACTER WAITING 


meee NENE —- SET MIS REALTY FOR INPUT FLAG * 


MDSINDNE MVI 
CALL 
CALL 
IN 
MVI 
STA 
MVI 
CALL 
OD 
EOP 
Ole 
RET 


A ,XON »CONFIRM IT 
MUSOUT 
Pao ils 
MDATAPT 
A ,OFFH 
MOSRDYF 
A,XON 
MCTSOUT 

H »RESTORE REGISTERS 
D 


B 


sOSET MIS REALTY FLAG 
»>CONFIRM RECEIPT OF DATA 


>BACK TO MISIN CALLER 


* ESCK -— CHECK FOR ESCAPE COMMAND FROM KEYBOARD 
a IGNORE ALL OTHER INPUT * 


ESCK CALL 
RRC 
RNC 
CALL 
CPI 
JZ 
MVI 
CALL 
RET 

ESCK@1 LITA 
ORA 
JZ 
CALL 
RRC 
JNC 

ESCK1 MVI 
CALL 


CONSTAT ;CHECK FOR INPUT 

; NONE 
CONSIN -IS IT ESCAPE? 
ESC ;1S IT oBSCAPE? 
ESCK@1 ao 
E,BKSPCE ;sCON’T PRINT CHARACTER 
CONSOUT 
SYSSTAT “GET SYSTEM STATUS 
A 
ESCK1 sHOST IN CONTROL 
CNTRLCK *SEE WHO IS IN CONTROL 
MENU ° NO AEORT 
0 > YES, SEND ESCAPE CMI 
MDSCMD ; TO Mops 





XRA 
STA 
JMP 


A sHOST NOW IN CONTROL 
Soo LAT 
MENU »sNOW BACK TO MENU 


foal ~ GET STATUS OF MIS SIO 
* RETURNS WITH A = @@ AND Z = 1 IF NO CHARACTER WAITING 
# 


MeotAtT XRA 
OUT 
IN 
ANI 
RZ 
MVI 
RET 


= OFFH AND Z = © IF CHARACTER WAITING * 


A sCHECK SIO STATUS 
Moca eT 
yi Jie Wkigsl 
i >CHARACTER WAITING? 
» NO, RETURN WITH A = @ 
A ,OFFH > YES, RETURN WITH A = OFFH 


Sommer a6 — CONVERT 16 BITS BINARY DATA TO HEX ASCII 


eeowLL WITH 
2% 
* RETURNS 


SivTLG PUSH 
PUSH 
mood 
INX 
INZ 
INX 
MVI 

Ciigee61l MOV 
ANI 
Cal 
JC 


ATI 
CNYT1615 ADI 
MOV 
UCX 
viel 
ORA 
cMureri62e MOV 
RAK 
MOV 
MOV 
RAR 
MOV 
TCR 
JNZ 
LCR 
JNZ 


HL = AYTRESS FOR 4 CHARACTER ASCII OUTPUT 
STRING 

BC = 16 BIT BINARY DATA 

REGISTER PAIRS UNCHANGEL 

A = GARBAGE * 


A SSAVE REGISTERS 
D 

B 

31 

H 

H 

D,4 ;CHARACTER COUNTER 

AnG SNEXT 4 BITS 

OFH 

SAH IS If A-F? 

CNVT1615 ; NO 

7 ; YES 

“go ° sFORM ASCII 

M,A >STORE THIS CHARACTER 

H ;BACK UP THROUGH OUTPUT AREA 
bee sDOUBLE RIGHT 

A ‘SouRT RIGHE 4 BITS 

A,B 

B,A 

a6 

Ck 

E >DECREMENT SHIFT COUNTER 
CNVT162 ;STILL SHIFTING 

i SCECREMENT CHARACTER COUNTER 
CNVT161 SSTILL CONVERTING 








eee — ee 


Bor 


POP 
POP 
RET 
bo 4 
* CALL WITH 
af 
* RETURNS 


hy 


CNVTS PUSH 
PUSH 
PUSH 
INX 
MVI 
JMP 


sRESTORS REGISTERS 


Parcs tJ 


ree —- CONVERT & BITS EINARY TaTA TO HEX ASCII 


= ATTRESS FOR 2@ CHARACTER ASCII OUTPUT 
STRING 
= Ooms Nake LATA 


REGISTER PAIRS UNCHANGED 


= GARBAGE * 
A »SAVE REGISTERS 
D 

B 

H 
te 
CNVT161 »DO CONVERSION 


Poean —- PRINT A STAR * 


STAR Buh a 
LXI 
CALL 
ree 
RET 


D 
[ OL aRMOG sPRINT IT 
BRINT 
D 
>BACK TO CALLER 


wx MISCELLANEOUS MESSAGE ANT DATA STORAGE AREAS *** 


SIGNON TB 
DB 
INSTRUC ULB 
LB 
DB 
TB 
UB 
DB 
TB 
UB 
DB 
UB 
CB 
DB 
UB 
UB 
DB 
UB 
UB 
DB 


CR»LF, ALTOS MIS CONTROL PROGRAM’ 

mea=eerRs ton 1.5 .CR.LF,LF, 3° 
CR Glen nSG LOMmAMPGE ENS TRUCTIONS: “,GR.LF,LF 
wig Loe PROMPT FOR INPUT OF TATA 1S” 

yr eR ln 

B. ALL INPUTS MAY BE IN UPPER OR lower’ 
CAS. sen Lr 

C. ADDRESS AND DATA INPUTS ARE EXPECTED’ 
TO BE IN HEX NOTATION.’ ,CR,LF 

D. TERMINATE INPUTS WITH A CARRIAGE ’ 
“RETURN OR LINE FEED.’ ,CR,LF 

“ B&. NORMAL LINE ELITING ON INPUT IS AS ” 
“IN CP/M AND MP/M.°,CR,LF 

“ F. FOR ADDRESS INPUTS, THE PROGRAM “” 
“WILL ALWAYS TAKE THE LAST FOUR OR LESS 
CRreer , ° HEX CHARACTERS ENTERED; FOR ” 
“DATA INPUTS, THE LAST TWO OR LESS.’,CR,LF 
“ G6. SOURCES OF COMMON ERROR ARE INVALIL’ 
[ane Dierro _TOOMMANYT OR TOO EER” (CR,LF 

‘ DELIMITERS, AND ILLEGAL SYNTAX.°,CR,LF 


.y YY DV WQS 
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TER 
TB 
UG 
UB 
DB 
CB 
as 
DE 
CB 
CB 
DB 
TB 
[3 
DB 


MENUMSG TB 
DB 
UB 
CB 
DB 
TB 
TB 
DB 
UB 
Es 
DB 
LE 
CB 
DB 
UB 
U3 
UB 
Le 
ibis 
DB 
UB 
CB 
DB 
CB 
es 
DB 
UB 
UB 
SiS MOG DB 
UB 
MOSMSG TB 
HOSTMSG DB 
NOMENMSG CB 
YESMENMG TB 
MENERRMG DB 
MFTELERR CB 


“ H. IN GENERAL, THE SAME CATA I/O FORMAT’ 
7 AS USED IN DIGITAL RESEARCH’ ’°S°,CR,LF 

: [LIT IS USEL HERE. FOR EXCEPTIONS,” 

“ CONSULT THE USER’ S MANUAL.” ,CR,LF 

“ I. A QUESTION MARK ENTERED AFTER THE 
“PROMPT WILL CAUSE THE INPUT FORMATS TO’ 
CR,LF 

4 BE DISPLAYED.°,CR,LF 

7 ee le STE ESCAPE KEY IS ENTERED DURING ° 
“INPUT THEN THE USER IS RETURNED’ ,CR,LF 

TO THE MENU. ’,CR,LF 

“ K. FOR FURTHER LETAILS, CONSULT TEE 
“USER’ “°S MANUAL’ ,CR,LF,LF 

“PRESS ANY XEY TO CONTINUE >$% 


Cony oe ae ; 
‘ MENU’,CR,LF 

2 HOST COMMANTS 7 
: MES COMMANLIS’,CR,LF,LF 


“A. SUPPRESS PRINTING MENU 

“G@. DOWNLOAL HEX FILS - LISK TO MES ” 
“MEMORY’ ,CR,LF 

“B. DO NOT SUPPRESS PRINTING MENU ° 
“H. UPLOAL MES MEMORY TO HEX LISK FILE’ 


CR 

"C. BASIC INSTRUCTIONS p 
“I. EXAMINE/SET MES MEMORY LOCATION(S) ’” 
CR,LF 

“D. HEXADECIMAL ADD & SUBTRACT - 


JS GOMEINUOWS SH? OF MIS MEMORY ,CR,LE 
“E. RETURN SYSTEM CONTROL TO HOST ‘ 
°K. FILL MDS MEMORY WITH SPECIFIED BYTE’ 
CR ane 

°F. RETURN TO CP/M 
“L. LOCATE BYTE SEQUENCE IN MDS MEMORY’ 
CR, LF 


a 


a 


“M. DUMP MDS MEMORY LOCATION(S) TO CONSOLE’ 
CR,LF 


a7 


°“N. EXECUTE MIS MEMORY FROM SPECIFIEL”,CR,LF 


“) PECCARVON ,CR in. >” 

"STS TaMmSTATUS: SSss IN CONTROL; ” 

‘ $$ MENU SUPPRESSION’,CR,LF, “$° 

“MES $7 

“HOSTS ” 

;NO8 ; 

CR,LF, INVALID MENU SELECTION’ ,cCR,LF,’$~ 
CR,LF, TOO MANY OR TOO FEW [LELIMITERS IN’ 
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PERONLYM 
INVHEXER 
SEDELERR 
SEQDELER 
AMBIGERR 
COLONERR 
ENCHARER 


HEX#TERR 
SPFNERR 


NPRTERR 
FNFNDERR 
CKSUMERK 
CSKRDERR 
DIRSPERR 
SGFAERR 


DDS PCERR 


DRIVSRR 


CNTRLMSG 


ABORTMSG 
ABORTEDM 


EXMSG 
EXMSGe2 


YFORMTMSG 


TB 
DB 
LB 


LE 
UB 
DB 
UB 
CB 
DB 
LE 
CB 
DB 
eB 
CB 
DB 
Ch 
LB 
DB 
DB 
UB 
DB 
PB 
LB 
DB 
ee 
LB 
D3 
HD 
UB 
DB 
UB 
EB 
DB 
UB 
CB 
DB 
CB 
CB 
DB 
UB 


DB 
Eb 


DB 


r 
L 


UB 
DB 
LE 
CB 


7 


veut. Ch, LF, > 

CR reo ON Ie PLEASE, 1° ,CRs La 1S 
CReGr. INVALILT HEX LIGIT’,CR, ho 5 

Ch epecan. <T HAVE A DELIMITER AT START OR’ 
“ ENT OF PN EU one LE > 

on ae “TWO OR MORE LELIMITERS SEQUENTIALLY ’ 
Roe 


CR,»LF, “AMBIGUOUS FILENAMES NOT ALLOWEDL’ 
CRLF.’ ; 

CR,LF, “COLON (:) NOT PROPERLY PLACED IN ” 
“FILENAME Teas ine: > 

on? ae ‘PILENAME TOO LONG OR TOO SHORT’ 

CR, De “(8 CHARS MAX, 1 CHAR MIN)’,CR,LF, “3° 

CR peeene rT Een VeNS ONLY !° CRLF ae 


CR, ihe 
Ces ie 

CR,LF, mone PRINTABLE CHARACTERS NOT ” 
“ALLOWED IN FILENAME’ ,CR,LF, 

CROLEY, FILE NOT SOUND .Cr-. sik Sos 

CR LF, HEX CHECKSUM ERROR’ CR, eae 

CR, LF, “DISK REAL ERROR’,CR,LF, “9” 

Ch et cOUlmomeD LRMe TORTS RPACK CRLF 9S 
CR,LF, “START ATLRESS CANNOT BE "GREATER : 
“THAN FINISH ALLTRESS’,CR,LF, 

CR»LF, “ouT OF DIRECTORY OR DISK STORAGE ° 
SSPACE’,CR,LF, “PARTIAL FILE WAS NOT 
“SANE al” Che LF, 

CR, LF, WARNING —- ONLY CURRENTLY SELECTED ” 
“CLISK WILL BE USEL, INPUT IGNORED !’ 
Chie. 5 

CR,LF, MDS IS IN CONTROL, 
“ UNTIL @pgiOn “ES [5 SELECTEL ’ 
CR»LF,°ABORT MES CONTROL (Y/N)? $ 
CR,LF, MDS CONTROL ABORTED, HOST IN 


NO SPACES ALLOWED IN FILENAME’ 


CAN’ °T CONTINUE’ 
,CR,LF,°9° 


“CONTROL.” ,CR,LF, “9° 

CR»LF,°WILL CONSOLE BE RECEIVING LATA * 
“FOR DISPLAY FROM THE MDS (Y¥/N)?37 

CR Ure re 


( MES IS IN CONTROL, HOST MAY REGAIN ” 
“CONTROL ONLY BY TYPING THE ESCAPE XEY ! 

GeeGe, Le. 5 

CRLLF,’ INPUT PARAMETER FORMATS ARE AS 


a 


e 


FOLLOWS :°,CR,LF 
MENU De s 
X IS OPTION SELECTION (A-N)’°,CR,LF 
ZEXARITH Dee TY YY i 


XXXX & YYYY ARE HEX INTEGERS “,CR,LF 


» x. ’ N ,. NN ’ 


CDWNLOAD >FILENAME( .HEX) 

(ome) ©S OPTIONAL ,CR,L® 

UPLOAL >FILENAME(.HEX)°,CR,L? 
Dien TITY ; 





DB Owes Tir ARE MDS HEY SPART AND’ CRLF 

CB ¢ @ 

DB “ END ADDRESSES FOR UPLOAL’,CR,LF 

CB ° EXAMINE MIS >XXXX 7 

DR Spee re see rRST MES HEX ALERESS TO’ 

DB Chee. a 

LB (EO RAMING AND SEL ,CR.LF 

DB 4 Deen az c 

DB “Wetter 15° HEX ADDRESS, YY IS BEX DATA’ 

cB Che la, 4 

LB RT erHAT OAPPRESS, 22 1S CARRIAGE RETURNS 

DB Clem. ‘ 

cy 7 or ZZ IS NEW HEX LATA’ 

LB Cher... ° 

DB J mae? oes” CEC R, LE 

LB ‘ CONT MOUS  >X8 ‘ 

LB Wee so is Bam START ALLRESS FOR’ 

DB CRLF,” . 

CB FIRST CHANGE’ ,CR,LF 

DB ; PUNE Bai Cue cucs. ° 

DB “ ARE HEX DATA FOR ENTRY INTO MDS MEMORY’ 

CB Chars. ° 

LB “ (255 ENTRIES MAX, INCLULING DELIMITERS )’ 

DB Ch,LF 

LR @ @ 

LB a Cl Lig oe el Se nY PRT ATER THE“ 

DB CRele,.” 

Ee “ PROMPT, THE OPTION IS ENDED’ ,CR,LF 

LB ‘ mI Lis DKK TIYY ZZ 4 

DB “ "XiX% & YYYY ARE MDS HEX START AND’ 

DB CRat tia. : 

LB “TC ADLRESSESMUOe ED LELe BEMWEEN? ° ,CReLr 

DB 0 a 

CB S22 eee Om SterOR BILL” ,CR,LF 

DB CR,LF,° PRESS ANY KEY TO CONTINUE >$’ 
FMTIMSG1 DB CR ie Ue 

LB ‘ TOCHEE Smo. eX ( Ye) ‘ 

LB " SOK S YY) eRe MES HEX START ANCD’,CR,LF 

DB a 0? 

LB ” OPTIONAL END ADDRESSES TO SEARCH BETWEEN ’ 

CB CR,LF 

DB ° See be.. PE ° 

cB “ ARE UP TO A 16 BYTE HEX SEQUENCE’ ,CR,LF 

CB # a 

DB “ 0 SEARCH FOR IN MES MEMORY’,CR,LF 

cB 7 LUMP D>ERKX( YYUE) 5 

DB ” XXXX & YYYY ARE MES HEX START AND’ 

DB GR er . 

cB “ OPTIONAL END ALLDRESSES TO [LUMP BETWEEN’ 

DB OR Las 

DB é EXECUTE SKK A 


ane 








LB “ XXXxX IS MES HEX ALLDRESS WHERE EXECUTION’ 


DB CR,LF 
LR a 0 
DB - ToelOepecin Chale. Le 
DB “PRESS ANY KEY TO CONTINUE >$° 

HEXMSG CB CR»LF, HEX ALLT/SUB’,CR,LF,°9° 

HEXMSG1 IB “suUM = 9$$5 

HEXMSG2 DB CUM MRM 5 > CR Limon 

EXAMSG TB CR» LF, “EXAMINE/SET MIS MEMORY “’,CR,LF,°$° 

EXAMSG1 OCB 

EXAMSG2 DB oes 

mroeMsG cB ee MEO MNMOR. EOCGATION(S)° CR. LF 
LB 

CSETMSG DB CR, LF, ‘CONTINUOUS SET MES MEMORY W/O ° 
CB “BXAMINE ” SOR Late 

EXECMSG [CB CRLF, EXECUTE MES MEMORY FROM SPECIFIED ° 
DB “ADDRESS ’ SGkia lie) cone 

LOCMSG IB Create "LOCATE BYTE SEQUENCE IN MES MEMORY’ 
oe Chain 

NOTFOUND DB CRALE, BYTS SEKOURNO@ NOT FOUND !° ,cReLF, “s ° 

FOUNDIMSG IB CR,LF, “FOUND STARTING AT MIS ALLRES3 7 

FOUNDIMS1 IB ete NG neo 

DUMPMSG DB CR, LF, “DUMP MDS MEMORY’ “Chemie. > 

LUMPMSG1 IB ett a 

DUMPMSG2 LB asians 

DUMPMSG3 DB SPS PP PSO SIOS FRE 99 

MENUPRO1 CB CR,LF,°OPTION A = MENU SUPPRESSION, 3 = ” 
DB “NO MENU SUPPRESSION “ 

MENUPROM DB CR,LF, “INPUT MENU OPTION $7 

PROMPT IB pe 

FILENAME IB “FILENAME $7 

DWNLDMSG BB CR,LF, “DOWNLOAD HEX FILE FROM DISK TC MIS’ 
CB “ MEMORY ’,CR,LF, ” ° 

DWNCONE UCB CR,LF, “LOWNLOAL eee 

DWNDONE1 DB TMDS START ADDRESS = $9554 , LAST ADDRESS ° 
LB = $$9$H°,CR,LF, 

UPLIMSG [IB CR,LF, “UPLOAL (SAVE) MEDS MEMORY TO LTISK “* 
DB THe Tee Ree 

UPLLIONE IB CR» LF, “UPLOAL TO LISK SUCCESSFULLY ° 
LB “COMPLETED SCR, LE o- 

DATAMSG DB - $$ $7 

STARMSG IB cae 

FCBMSG OB Q,20H,20H ,20H,20H ,22H,205,20H , 208 
DB "HEX ,2,8,9,@2 

SYSSTAT CS 2 sS¥YSTEM STATUS FLAG 


» HOST IN CONTRCL = @ 
> MBS IN CONTROL = 1 

MENUSUPF CS 1 sMENU SUPPRESSION FLAG 
>» © = NC SUPPRESSION 


Tue 








MENUFLG [5S 
FRSTLEL CB 
BIRST DW 
SECOND Bea 
SUM Cw 
START DW 
FINISH DW 
aoelala 6fS 


CONSDATA DS 


MESRDYF 5 
FIRSTIME LS 
BUFFCNT 05S 
CURRENT DS 
CONTFLG U5 
FCB S 
CONEUFF UCB 

DS 


DSKBUFF EQU 
ENT 


© YQQQ Qe 


tr 


hr pr 


IE 
48 


Zoe 
? 


Stan TER 


mes 


jee ORES 5 LON 

ySTORAGE FOR MENU CHOICE 
sFIRST CESLIMITER FLAG 
sFIRST NUMBER TO ADD/SUB 
;SECOND NUMBER TO ALI/SUE 
»SUM OF HEX NUMBERS 
sOTARTING ADURSESS FOR 

> COMMANT USE 

sFINISH ALPRESS FOR 

> COMMAND USE 

ho eoOnmaGk ron CATA 
peOl MLS 

»TEMP. STORAGE FOR DATA 
mene ONsOGE. TO MLS 

xMDS REALTY FLAG 

> OF FH = DONS, @ = NCT DONE 
sFIRST TIME THROUGH REAT 
»>BUFFER COUNT SPACE 
»>CURRENT DISK DRIVE 
»>CONTINUATION FLAG FOR LTISK 
> REAL OPERATIONS 

> O2 = NC CONTINUE 

» OFFH = CONTINUE 

»>SPACE FOR FILE CONTROL 

>» BLOCK 

»>LEFAULT TO 48 CHARACTERS 

> MAX FOR CONSOLE EUFFER 
>PROVIDE FOR 255 CHARACTERS 
sOTART OF CTISK BUFFER 








APPENTIX [C 


MDS MONITOR SOFTWARS LISTING 


ME HES AE HE AE EE AS ES a KR EE OS KO eS KK EO RO HE te ACK KE OS EE ok OS ES eo OK ok ok 
3 a 
% AMIS1 - ALTOS MICROCOMPUTER [DEVELOPMENT SYSTEM * 
. (MDS COLE) - 
x6 x 
* VERSION 1.3, 28 MAY 1981 “8 
* LT. STEPHEN M. HUGHES - AUTHOR * 
* 3s 
% THIS IS THE MDS MONITOR COLE FOR THE AMDS. THE AMIS * 
* USER’S MANUAL SHOULD BE CONSULTEL FOR SPECIFICS NOT ** 
* GIVEN IN THE DOCUMENTATION WHICH FOLLOWS. xe 
* 38 
BK A AK EE AK AK KE KS KE KO KOE A OK OK OK ASK IK EON OE OK CS ER KOK EE RK AE OK OS NE SOK KEE KE EK RS OE OK 
RAM EQU 20208 sSTART OF ONBOARD RAM 
CHASTAT EQU QE4H SCHANNEL A STATUS ANI 
> COMMANL/CONTROL PORT 
CHADATA EQU @ESH sCOHANNEL A DATA PORT 
CHBSTAT EQU QE2H ;CHANNEL B STATUS ANE 
> COMMANLD/CONTHOL PORT 
CHBDATA EQU GE1H >CHANNEL 3B DATA PORT 
* {NOT USE IN TEIS COLE) 
BAUDREG EQU GEGH sPORT FOR SETTING BAULT RATE 
; OF SEREAL PORTS 
XON EQU Q1iiH SCONTROL Q 
ORG GSOCH sSTART OF PROM 
JMP PORTSET sSET UP SERIAL PORT ON RESET 
NOP 
NOP 
USERIO JMP USRIO sUSER CALL FOR CONSOLE I/0 
GiRG G@38H sRST 7 LOCATION 
JMP EXECINE sUSER RST 7 COMES HERE FOR 
> RETURN OF CONTROL TO HOST 
; AND ONBOARD MONITOR 
ORG GZ4OH -RST 7 + 8 
MONITOR LXI siamo TACK sSET STACK EVERY TIME 


122 





= sae t ¢ é 4. 


iW 7 
f _ 








MONITOR1 ANI 


xe 
e 
CWNLI 


CWNLD1 


CWNLI 


XRA A 

STA OPTION “RESET OPTION FLAG 

CNEL HOSTIN “GET COMMAND FROM HOST 
7TH SCOMMANET WILL EE ASCII 

cre “Ww ;LOWNLCALE COMMANL? 

Ti DWNLD 

CPI “yee sUPLOAL COMMANL? 

vz UPEL 

CPI ae *SXAMINE/SET MEMORY CMD? 

iz EXAM 

CPI og -CONTINUOUS MEMGCRY SET CML? 

ye CSET 

CPI on ;FILL COMMANL? 

12 PL 

CPI aly *LOCATE SEQ. COMMAND? 

17 Oa in 

CPI ait ;DTUMP MEMORY COMMANL? 

IZ DUMP 

CPI ;EXECUTE MEMORY CML? 

17 nec 

IMP MONITOR *ANYTHING ELSE IS IGNORED 


= LOWNLOAT HEX TISK FILE TO MES MEMORY ROUTINE 
ROUTINE LOOPS UNTIL A HOSTTONE COMMANT I5 
DETECTED BY THs INPUT ROUTINE * 


CALL HOSTIN »GET NUMEER OF BYTES TO 


» EXPECT 
MOV C,A 5C = BYTE COUNTER 
CALL GETALTIR »GET STARTING ALLRESS 
CALL HOSTIN iGET A BYTE 
MOV MA so ORe IT 
INX d 
CC C 
JNZ DwNLD1 sMORE BYTES TO GET 
JMP CWNLE »GET NEW ALTTRESS FIRST 


evel — UPLOAL MPS MEMORY TO LISK HEX FILE * 


UPLL 


UPLI1 


CALL GETALITR 
SHLI SE Ayal: 
CALL GSTADDR 
SHLI FINISH 
LHLT START 


9GET STARTING ALLRESS 


sGET FINISH ADDRESS 


XCHG »>DE = START ADDRESS 
LITAX L sGET CATA 

CALL HTATAOUT soBNT IT 

INX D 

CALL BUFFCMP >CONE YET? 

RRC 

JNC UPLD1 » NO 


lon 








CALL MUSREY eS 

JMP MONITOR 
* EXAM — EXAMINE/SET MEMORY 
* MOOPS TIMDPINPUT CLETECTS HOSTIONE®COMMANT * 
EXAM CALL GETATOUR sGET STARTING ALLTRESS 
EXAMI MOV Aer sSEND DATA AT KL ADDRESS 

iO ea L 

CALL HLATAOUT 

CALL HOS. EN »GET NEW DATA 

MOV ee poor om IT 

INX H 

JMP EXAM1 >LOOP TILL HOSTDONE 
pees — CONTINUOUS SET OF MLS MEMORY 
= OOPS TIL S@SPLONs’ LETECTED = 
CS aT CALL GETADDR ‘ce SoAHLING ALDRESS 
CSET1 CALL BOON »>GET LATA 

MOV iat ; LbEOonr CT 

as CSET1L » LOOP 
creme — FILL LESIGNATEL MEMORY LOCATIONS WITH SPECIFIETL 
< DATA * 
FILL CALL GeTADDR sGET FIRST ADDRESS 

SHLI Sve 

CALL GETATIR 9GET LAST ALLRESS 

SHLD HIN Tod 

CALL HOSTIN sGET LATA TO FILL WITH 

MOV ome: » SAVE [T 

LHLD ere 

XCHG ;LTE = START ALLTAESS 
FILL1 MOV A,C sGET FILL LATA 

AK D 7 VeEOo! IT 

INX L 

CALL BUFFCMP »LONE YET? 

RRC 

JNC me Go > NO, KEEP FILLING 

CALL MISTONE » YES 

JMP MONITOR 


* LOCATE - LOCAT 
si SENLTS 
SENDS 


LOCATE CALL 
SHLD 
CALL 
oul 


E BYTE SEQUENCE IN MLS MEMORY 
“F) TO HOST IF FOUNL 
‘N° TO HOST IF NOT FOUND * 


GETATCDR sel owen ALERESS 
OLAKT 
GETADDR 9GET FINISH ADDRESS 
rN iS He 


lize 





LOCIN 


SEARCH 


SRCH1 


MATCH 


MATCH1 


FOUND 


LXI 
MVI 
CALL 
PUSH 
LDA 
RRC 
JC 
POP 
MOV 
INX 
INR 
JMP 
MOV 
OLA 
LHLL 
XCHG 
LXlI 
LUAX 
CMP 
JZ 
INX 
CALL 
RRC 
JC 
JMP 
XCHG 
SHLI 
XCHG 
DCR 
JZ 
INX 
CALL 
RRC 
JC 
INX 
LIAX 
CMP 
JZ 
LHLL 
INX 
LDA 
MOV 
JMP 
MVI 
CALL 
LHLD 
MOY 
CALL 
MOV 
CALL 
JMP 


Loe F 
Cae 

HOSTIN 

PSW 
ASTRDYFL 


SEARCH 
PSW 

Mis 

Hq 

LOCIN 
Ay 
LOCOUNT 
Seen 


H,DATABUFF 
[ 

M 

MATCH 

IE 


BUFFCMP 


NOTFNT 
SRCH1 


MATCHATR 


C 

FOUNTL 

c 
BUFFCMP 


NOTFNE 

H 

b 

M 

MATCH1 
LATABUFF 
L 
LOCOUNT 
Cred 
SRCH1 

ee 
HLATAOUT 
MATCHALR 
A,H 
HDATAOUT 
ni 
HDATAOUT 
MONITOR 


sOTORE SHOUENCE AEHE 
»LATA COUNTER 
5GHT SEQUENCE 


9LF SeT THEN NO MCKE DATA 


; START SEARCH 
>MORE DATA 
pomons LT 


»>BUMP COUNTER 


sGET SEQUENCE COUNT 
»OAVE IT 


LE START ADDHESS 

»HL START OF SEQUENCE 
xGET MCS TATA 

; IS THERE A MATCH? 

» YES 


» NO, SEE IF LONE 


#{ ho, of. NOT FOUND 

»NO, TRY AGAIN 

9HL = FIRST MATCH ADDRESS 
» SAVE IT 

sRESTORE CS & GL 

sALL MATCHES YET? 

> YES, FOUNT SEQUENCE 


»CONS YET? 


> YES, SEQ. NOT FOUNL 
> NO, LOOK FOR NEXT MATCH 


sANOTHER MATCH? 

, tts 

> NO, START ALL OVER 
SRE-INIT. SEC. COUNT 


sKEBP TRYING 
sO END FOUND TO HOST 


sGET FIRST ALDER. OF MATCH 
> om IT TO HOST, “SB FIRST 


> THEN LSB 


»ALL LONE 








NOTFENT 


MVI 
CALL 
ter 


A,°N- 
HDATAOUT 
MONITOR 


,OEND NOT FOUNT TO HOST 


* DUMP - DUMP MES MEMORY TO HOST CONSOLE * 


eet) CALL GETAITR sGET START ATLTRESS 
SHLD START 
CALL GETADDR »GET FINISH ADDRESS 
SHLL PINTSH 
LHLE START 
XCHG »DE = START ADDRESS 
POMP 1 LUAX [ ‘GET MES MEMORY TATA 
CALL HLATAOUT 
INX D 
CALL BUFFCMP >CLONE YET? 
RRC 
JNC DUMP1 » NO 
CALL Mioeee ¥ > YES 
Sine MONITOR 
* EXEC - EXECUTE MDS MEMORY 
- PROGRAM TO BE EXECUTED MAY RETURN MONITOR VIA 
% A “RST 7° INSTRUCTION OR A JUMP TO LOCATION 
i GOOCH 
1g HOST CONSOLE I/O IS AVAILABLE AS EXPLAINET IN 
: THE USRIO ROUTINE * 


EXEC STA OPTION pO AVE OPTION 
CALL GETALTIR >GET EXECUTION ATLTRESS 
PCHL ja 0 1 Ose 


See eULILITY SUBROUTINES *** 

c Beer CMP = COMPAR DE TO PINISH ADLURESS + 1 
IF BQUAL, RETURN A = @FFH 

43 IF UNEQUAL, RETURN A = 08 * 


BUFFCMP PUSH A 


PUSH D ;DE=CURRENT ADDR TO COMPARE 
LHLI FINISH ‘HL = FINISH ALLRESS + 1 
INX H 

MOV A,B ;H = D? 

CMP i 

INZ NOCMP ; NO 

MOV A,L eso Le =. 8? 

CMP E 

INZ NOCMP ; NO 

MV I A,OFFE ; YES, ADDRESSES ARE ECUAL 
POP D 








EOL 
RET 
NOCMP XRA 
rO'P 
nO 
RET 


* GETALTTR ~- GET 


GETADDR CALL 
MOV 
CALL 
MOV 
RET 


SeoeRrokT — SET 
x 


sALTLTRESSES NOT EQUAL 


Ly cy 


ERESS FROM HOST 


HOSTIN »GET MSB FIRST 
BA 

HOSTIN » THEN LSB 

L,A 


UP SERIAL I/O PORTS ON EVERY RESE™ OR 


CALL TO @@@OH * 


POKTSET MVI 
OUT 
MVI 


OUT 
OUT 
Pd 
OUT 
OUT 
JMP 


ards sSET RATE TO GS5G@G BAUTL 
BAUDREG 
A,01001110B poe GON PROLLY BYTE 

pot ol OR OB LT 
CHASTAT >; O-PARITY, & BITS/CHAR 
CHBSTAT » 16x RATE FACTOR 
A ,@0110111B ,OEND COMMAND FYTE 
CHASTAT 
CHBSTAT 
MONITOR 


USRIO - USER TO/FROM HOST CONSOLE I/O ROUTINE 


REG e 


REG. 


H HR Hee HE KK HEH 
l 


USRIO PUSH 
MOV 
CPI 
JZ 
CP! 
JZ 
CPI 
CZ 


USER EXECUTED PROGRAMS IN MCS MEMORY MAY 
COMMUNICATE WITH THE HOST CONSOL® VIA A CALL 
TO LOCATION @@O5H 

FOR INPUT FROM THE HOST CONSOLE, CALL WITH 


C= 1 - CHARACTER WILL BE RETURNET IN A 


FOR OUTPUT TO HOST CONSOLE, GALL WITH THE 
CHARACTER IN A ANT REG. C = 2 
TO CHECK THE FOR HOST INPUT, CALL WITH 


C = 3 —- RETURNS A = 6@ IF NO INPUT HAS BEEN 


RECEIVED FROM THE HOST; A = OFFH IF INPUT IS 
WAITING 
-~ IFC 2 1, 2 or 3 THEN ROUTINE RETURNS WITH C = GFFH 


PSW 

A,C (Joe INPUT OR OUTPUT 
Hf 

USRIN 

Z 

USROUT 

5 SWANT STATUS ? 

HOSTAT ; BS, GET IT 


Teo 








vee C28 sILLEGAL COUE 


RET 
USRIN CALL MUSRLY em deon TO SENT INPUT 
POP PSW 
CALL HOSTIN sGET INPUT 
RET ; RETURN WITH IT IN A 
USROUT POP PSW 
CALL HDATAOUT sSEND CHARACTER TO HOST 
RET 
* EXECDNE - THIS RETURNS USER PROGRAM TO MONITOR AND 
8 RETURNS CONTROL TO HOST IF A RST 7 IS EXECUTEL * 
EXECINE LIA OPTION Sle Thien eours OPTION 
Cel “ES * WAS IN EFFECT WHEN CONTROL 
* WAS TRANSFERPEL HERE 
JINZ MONITOR > NO, HOST IN CONTROL 
CALL MESIONE * YES, GIVE HOST CONTROL 
JMP MONITOR 


oeeeotiN — GET INPUT FROM HOST & INTERPRET TYPE OF INPUT * 


HOSTIN CALL GETCHAR sGET INPUT 
Bop IN1 CPI 958 915 iT AW COMMANT? 

JZ HOSTCMY 

CPI OFFH j See OLA 2 

JZ HOS LUE 

JMP ROSTRIY »>MUST EE HOST REALTY FLAG 
HOSTCMD CALL ZETCHAR »GET ACTUAL COMMANT 

JMP MONITOR1 » GO TO MONITOR *0R DECODE 
HOSTUTA CALL sETCHAR jab LATA 

RET > RETURN TO CALLER WITH IT 
HOSTRDY CALL GETCHAR sGET READY FLAG 

MVI 4 ,Orrd > OET FLAG IN MIS 

STA HSTROYFL 

RET sRETURN TO CALLER 
GETCHAR CALL H@o ia »LOOP TILL CHAR. IS WAITING 

RRC 

JNC GETCHAR 
GETCHAR1 IN CHALATA »GET LATA 

PUSH PSW 

MVI A ,XON 

CALL HOSTOUT »CONFIRM IT 

moe PSw 

RET 


ene oroUr — SENC LATA TO HOST * 


HOSTOUT PUSH PSW 
CMLL HOSTAT sANYTHING FROM HOST? (HOST 


B26 








RRC 
JNC 
CALL 
CALL 


HOSTOUT1 IN 
ANI 
JZ 
BOP 
OUT 
Get 
RZ 

XONCK CALL 
RRC 
JNC 
IN 
RET 


meaeataAt — HOST 


HOSTAT IN 
ANI 
RZ 
MVI 
RET 


Hoo err lOoRI TY } 


y 
HOSTOUT1 ; NO 
SETCHAR1 ior Genel. 
HOSTIN1 ;IF COMMAND, BACK TO MONITOR 
7 eESh. LGWORE. IT 
CHASTAT Reon SuLA TUS 
1 
HOSTOUTI wyOOr Mim eA TY TO SENI 
PSW ;SEND CHARACTER 
CHADATA 
XON PPON@MovA? FOR XON 
; CONFIRMATION 
HOSTAT ;WAIT FOR CONFIRMATION 
XONCK 
CHADATA Ome TT 


VE UT oS Tat Uioms 


CHASTAT 
2 


ae 


sNO CHAR. WAITING, RET A=@ 
A,@FFH sCHAR. WAITING, RET A=CFFH 


* HDATAOUT - SEND DATA TO HOST IN PROPER FORMAT * 


HTATAOUT PUSH 
MV I 
CALL 
EOP 
PUSH 
CALL 
POR 
RET 


PSW »OAVE LATA 

A,OFFH >NEXT CHARACTER IS LATA 
HOSTOUT 

Pow 

PSW 

HOSTOUT »OEND DATA 

PSW sRESTORE LATA 


* MDSDONE - SEND MDS DONE COMMAND * 


MISTONE MVI 
CALL 
MVI 
CALL 
RET 


A ,55H sNEXT CHARACTER IS COMMANL 
HOSTOUT 

Leo ; QUIT COMMAND 

HOSTOUT 


* MDSRDY - MDS IS READY FOR INPUT OR OTHER ACTION BY HOST * 


MOSRIY MVI 
CALL 
MVI 
CALL 


A,@OH sNEXT CHAR. IS READY FLAG 
HOSTOUT 

A ,O@H 

HOSTOUT 


Ter 





RET 


wwe TATA STORAGE AREAS - IN ONBOARD RAM *** 


ORG 
HSTRIYFL CS 


MATCHALTR Cw 


LOCOUNT ODS 
START UW 
FINISH UW 
OPTION DS 

eS) 
STACK cs 


DATABUFF DS 


Q 


Nr Or QAP 
GW 


cn 


;oOST KEATY FLAG 

» Of = NOT REALTY 

» OFFH = READY 

sSTORAGE FOR FIRST ALTLRESS 

» OF MATCH 

sSTORAGE FOR BYTE COUNT 
sOTORAGE FOR START 6 

» FINISH ALLDRESSES 

sSTORAGE FOR OPTION SELECTED 
sALLOW FOR A 52 LEVEL STACK 


sOSTORAGE FOR LOCATE SEQUENCES 








APPENDIX E 


MDS MEMORY TEST PROGRAM LISTING 


BE AE IK OK SS OE TE IS 2S OO OE OE FISK SIC IE OE OKC OK OK OE IE OE OE OE HE OK OY IK OE ORE NE FIC OC OE TI DE NS BIC BIS AC OI OIE HE AK EE AS OK AE OK OS OG EO OK CH OK 


MDS MEMORY DIAGNOSTIC 


VERSION 2.5 


11 MAY 1981 


THIS PROGRAM IS A REVISION CF THE Z-80 MEMORY TEST 
PROGRAM PUBLISHEL IN THE FEBRUARY 1981 ISSUE OF 


"DR. LOBB’S JOURNAL OF 


COMPUTER CALISTHENICS & CRTHOLONTIA 


THE PROGRAM HAS BEEN TRANSLATED TO 8080 ASSEMBLY CODE AND 


REVISIONS MADE BY LT. 


AS STATED IN THE ORIGINAL TEXT, 
UNLESS INCLUDED IN THE BODY OF THE 


PROGRAM IS PROHIBITED 
REVISIONIST’S THESIS. 


xe 
* 
* 
F 
xe 
*s 
x 
x 
* MOLIFIELD TO OPERATE ON THE ALTOS ANT MIS SYSTEMS. 
x 
x 
* 
*k 
2 
* 
* 
cd 


STEPHEN M. HUGHES FOR USE IN THESIS 


“FURTHER RESALE OF THIS 


we de poe ee Ae ne SE 


HH 3 H G8 er 4 te 


BE AK HE REE SHE IE IE OE BE OK OE IC NE OE OK BE OE OK OE OK OE NE OC BE BE OK NE OE OK 216 DIE IE CO AE AKC DIC OIE IC Oe BE IK IK OK OF OE DIK BK AK AC OE OK TINE BE OK OK CK OK a 


ORG 4000H 
USRIO EQU COOSH 
BKSPACE EQU G34 
ESC EQU 1BH 
CR EQU OTH 
LF EQU GAH 
RCNT EQU o 
WONT EQU 3 
MEM DI 
LXI SP eo LAok 
LXI B,TEND 
Lil H,MEMT1 
CALL CHA 


* TiST STARTS HERE * 


MEMO1 CALL CRLS 
LXI H ,@O0G0H 


;USER I/O CALL 

sASCII BACKSPACE 
sASCII ESCAPE COLE 
sASCIT CARRIAGE RETURN 
sASCII LINE FEED 


sSEQUENTIAL REATS 
sOSEQUENTIAL WRITES 


sLISABLE INTERRUPTS 
sINITIALIZE STACK 
FORMAT ADDRESS OF END OF TEST 


sMAXE OUTPUT PRETTY 
sINITIALIZE PAS COUNT, 
> CUMULATIVE ERROR COUNT 





* GET TEST MOLE 


MEMOS 


SHLD 
SHLI 
SHLT 
LxI 

SHLI 
LXI 

CALL 


MV I 
OTA 
Lil 
CALL 
CALL 
MVI 
CALL 
CALL 
ORI 
CPI 
JZ 
Capel 
JZ 
GET 


JNZ 
XRA 
STA 


* GET MEMORY 


MEM@4 


MEM@45 


LX I 
CALL 
CALL 
MOV 
ORA 
JM 
LxlI 
PUSH 


MOV 
SUB 
MOV 
MOV 
SBB 
MOV 
ols 
JP 
taal 
CALL 


MEMF 
MEMX 
MEML 
ee 
MEMK 


H,MEMA 
DSPLY 


x 


A,l 
MEMP 


H ,MEMN 
Dome) 


CRLF 


4 ee 
USROUT 
USRIN 


20H 
ie 


MEM55 
oa 


MEMO 4 


t 


MEMOS 


A 
MEMP 


Tot iets 


H,MEMB 
foe LY 


ENTR 
A,H 
A 


MEM@5 
D,TEND 


2s 


72 


= 


MMos S es 
ood Py tr 


ry =< 
ee) 
=< 
& 
on 


% 


DS ea 


z< 
tJ 
=z 
3 


> ANC ALITRESS ‘OR’ PROLUCT 


;INIT. ADDRESS “AND” 
;PRINT PROGRAM TITLE 


»OET LEFAULT = ITEMIZE 


sPRINT SELECT I[,T OR E 
;PROVITE A CUE MARK 


sWAIT FOR INPUT 
»>MAXE LOWER CASE 
UY sp. @ fay 


SIF [, ITEMIZE ERRORS 


or tor ReNt TOTAL ®SRRORS 
» ONLY 

»IF NONE, TRY AGAIN 

,OSET TOTAL ONLY FLAG 


»>PRINT ENTER FBA 


;GET 16 BIT ALLDRESS 

;IF UPPER BYTE OF FBA IS 

>; NEGATIVE, OK TO USE 

SO JUMP 

OTHERWISE, MAKE SURE FBA 
IS NOT WITHIN TEST PROGRAM 
AREA 

(HL = HL - Dz - C) 


we Se we WE we SS 


;FBA IS OK, JUMP 
;IF FBA IS WITHIN TEST PROGRAM 
» AREA, SET IT TO END OF 





MEMG5 


* ALL ATDRESSES 


MEM@6 


MEM@8 


LXI 
SHLD 
LXI 


CALL 
CALL 
PUSH 
PUSH 
ORA 

PUSH 


LHLI 
MOV 
MOV 
ror 
MOV 
SUB 
MOV 
MOV 
oy2.D 
MOV 
JNC 
POP 
Ow 
LXI 
CALL 
JMP 


Bor 
Lil 
CALL 
PUSH 
LHLD 


MOV 
MOV 
FOr 
LXI 
CALL 
ECR 
PUSH 
LXI 
CALL 
EP 
INX 


H,TENT 
MEMI 
a y»MEMC 


DSPLY 
ENTR 


wy be MO 


eee ape ae ae 
“=< 
Q 
Oo 


H,MEMU 
DSPLY 
MEM@4 


OK NOW * 


B 
H,MEMG+5 
CHA 

A 

MEMI 


B,H 
C,L 

H 

H ,MEMG 
CHA 

A 

A 
d,MEMV 
DSPLY 
L 

D 


; PROGRAM & PRINT A WARNING 
;SAVE FIRST BYTE ALLRESS (FBA) 
>PRINT ENTER LAST BYTE ADDRESS 
bea 


see ACCEPT AILTRESS 
ySAVE LBA 


‘OeuR CARRY FLAG 
> (DE = CONTENTS CF MEMI 
; AND MEMI + 1) 


*MAKE SURE FBA < LBA 
; (HL = HL - DE - C) 


;IT°S OK, JUMP 
sRESTORE STACK 


sFBA IS >= LBA SO PRINT 


» ERROR MESSAGE 
» ANT ACCEPT ATTRESSES AGAIN 


9BC = [bid 
sCONVERT IT FOR PRINTING 


sCONVERT FBA FOR PRINTING 


; (BC = CONTENTS OF MEMI 
; AND MEMI + 1) 


»HL = LBA 
;PRINT ABORT INSTRUCTION 


»DE = LBA 
»LBA = LEA + 1 


* MAIN LOOP OF MEMORY TEST BEGINS HERE * 


* BEGIN A PASS * 





sINITIALIZE PATTERN NO. 


s INITIALIZE ERROR COUNT 


FOR CURRENT PATTERN * 


SUNT IT. ARIES COUNTER 
sGRP FIRSTSEYTE ALTRESS 


»CHECK KEY ROARD 


ETO) Meas) at 


>IF CHARACTER WAITING, 
PelveeRRoe TT TEST 

sOAVE PATTERN AND WRITES 
> COUNTER 

COVA oRN POR THIS 
> MEMORY ADDRESS 

5 somWR ITH IT 

sADVANCE MEMORY ALTRESS 
>CHECK IF END OF ARBA TO 
> TESTEL 

»LOOR ,aNOT YET 


BE 


;LOOP, NOT CONE YET 
WRITES COUNTER 


PATTERN OVER ANT OVER 


»GET 
sWRITE 


sINIT. READS COUNTER 


FROM MEMORY ANT COMPARE TO COMPUTEL 
IF DIFFERENCE [S FOUND ON FIRST READ, 
Ik FIRST REAL MATCHES , COMPARE 16 


ASSUME A 


»GET FBA OF MEMORY TO TST 
»CHECK KEYBOARL 

»IF CHARACTER WAITING, 

» INTERRUPT TEST 

sOSAVE PATTERN AND REALS 

» COUNTER 

»COMPUTE PATTERN FCR THIS 
> MEMORY ALTRESS 

peste Ot Vee 1 

»>READ MEMORY 

; 1 Se PARA CORRECT? 

mao, June 


MEM1 MVI Carl 
rel qT, 29004 
SGD MEME 
* TEST ALL OF CTESIGNATELD MEMORY 
x 
oe 
* WRITE PATTERN INTO MEMORY * 
hei 5 MVI B,WCNT 
MEM2 Laec MEMI 
CALL USRSTAT 
RG 
CC MEM5 
PUSH B 
MEM21 CALL PATTN 
MOV aera 
INX O 
MOV A,L 
CMP B 
JNZ MEM21 
MOY A,H 
CMP ic 
JNZ MEM21 
Poe B 
BER B 
JINZ MEM2 
MVI Beecnt 
* NOW REAL PATTERN BACK 
* PATTERN. 
* POSSIBLE WRITE ERROR. 
* MORE TIMES LOOKING FOR SOFT REAL ERRORS. 
MEMS LHLD MEMI 
CALL USRSTAT 
ORA A 
CNZ MEM5 
PUSH B 
MEM3S1 CALL PATTN 
MOV B,A 
MOV AM 
CMP B 
Al/4 MEM32 
MOV Mao 


To 


»WRITE THE CORRECT DATA 





MEMS2 


MEMS5 


+ 


KH 


CALL ERR1 


JMP MEMS5 


SUB 
ADD 
SUB 
ATL 
SUB 
ATL 
SUB 
ADD 
SUB 
ATL 
5 UB 
ATT 
SUB 
ADD 
SUB 
ATL 
CMP 
CNZ 


ma 
bo 
tv 


INX 
MOV 
CMP 
JNZ 
MOV 
Gee 
JNZ 
Pee 


= 


2 


ca 
mic ee 

CA 

— 


bo td TS tom Tt Bt eee (SC See 2m ee ES TS ee SS SS 
ey 
= 
CA 
— 


DCR 
JNZ 


x4 
t= 
<< 
ee 


LONE WITH ONE 


OF Pass * 
INR C 
MOV A,C 
GPT ee 
JNZ MEM15 
JMP MEM6 


CHARACTER WAITING ON KEYBOART, 
FOR EXIT REQUEST * 
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PER TRASLORGN T MATCE, 
pOOR ENT eECoo1 BLE @WwRI TE 
> ERROR AUDIT 
sTEST NEXT ALDRESS 
> DATA MATCHED ON 
> TRY FOR A SOFT REAT ERROR 
eves vceraro APTRESS A 
p oOuLD 16 TIMES 


Mtg Tl TRY 


sDOES DATA STILL MATCH? 

> NO, PRINT POoSITELE REAL 

5 HineOr AULIT 

;ADVANCE MEMORY ADDRESS 

sCHECK IF REACHED =NDT OF MEMORY 
> ARGa LTO BE TESTE. 

sNOT DONE YuT, LOOP 


;NOT DONE YsT, LOOP 
sRESTORE PATTERN ANT REAL 

» COUNTER 

»>READ PATTERN OVER AND OVER 


PATTERN, ALVANCE TO NEXT AND CHECK FOR ENT 


sINCREMENT PATTERN 
»LONE YRT? 


» NO, LOOP 
pe Pepe S PASS 


INTERRUPT TEST AND CHECK 





MEM5 CALL USRIN sGET INPUT 
CPI O4H *“T —- FREEZE ACTION 
ahs DISPSTP 
ORI 2GH “FOLE TO LOWER CASS 
CPI one sTYNAMIC SET ITEMIZE 
TZ MAKEI 
CPI “te PMT oC Skt LOTAL ONLY 
Jig MAKET 
CPI 7. 
INZ STAONI EL SRESTART TEST IF NOT & 
MEM55 ~= LX I H,MEMM sEXIT FROM TEST, PRINT GOOLDEYS 
CALL DSPLY 
leisPSTP CALL USRIN sWAIT FOR ANY KEY TO RESUME 
eAGTION 
CALL BSOUT sDON’T PRINT IT 
RET 
STACKIT LXI SP,STACK jas © USuRAc 
JMP MEMO 1 ‘RESPRRD LEST 
MAKEI MVI al ;MAKE ITEMIZE 
STA MEMP 
CALL BSOUT 
RET 
MAKET MV I A,@ sMAKE TOTAL ONLY 
STA MEMP 
CALL BSOUT 
RET 
: CONE WITH PASS THROUGH MEMORY * 
PRINT CONSOLE AUDIT IN THE FORM: 
Seep o: sexex ERRORS: xxxx CUM. ERRORS: xexx 
* (IF CUMULATIVE ERRORS > ZERO THEN ALSO PRINT) 
x AND? weemx OR: xxzx * 
MEM6 PUSH D ;SAVE LBA+1 
PUSH H ; (BC = CONTENTS OF MEMF 
; AND MEMF + 1) 
LHLD MEMF 
MOV B,H 
MOV Gare 
POP H 
INX B SCOUNT PASSES 
PUSH H ; (MOV BC TO MEMF) 
MOV H,B 
MOV Ec 


Loe 








SELL 
Rer 
LXI 
CALL 


PUSH 


LHLI 
MOV 
MOV 
FOr 
LXI 
CALL 
PUSH 


LHLI 
MOV 
MOV 
ROP 
LHLD 
DAD 


S350 pe 
PUSH 
ror 
LXI 
CALL 
MVI 


SLA 
LHLD 
MOV 
ORA 
JZ 
ive 


STA 
PUSH 


LHLD 
MOV 
MOV 
POP 
LXI 


CALL 
PUSH 


LHLD 
MOV 


MEMF 

A 
i,MEMG1 
CHA 

H 


MEME 
Beat 
C,L 
A 


H,MEMG2 
CHA 
H 


MEMX 
Bea 
oe 
H 
MEME 
B 


MEMX 

H 

B 

H ,MEMG23 
CHA 

A,CR 


MEMG25 
MEMX 

A ,H 

L 
MEM67 
ia 


MEMG25 
H 


MEMK 
By 

CyL 

H 
H,MEMGS 


CHA 
A 


MEML 
B,H 


sCONVERT PASS COUNT 


> (BC = CONTENTS OF MEME 
: AND MEME + 1) 


sCONVERT ERROR COUNT 


- (BC = CONTENTS OF MEMX 
; AND MEMK + 1) 


sACCUMULATE ERRORS FCR 
> ALL PASSES 


sFORMAT CUMULATIVE sSRRORS 


;SET UP OUTPUT TO SKIP “’AND’ 
>; & “OR’ OF FAILING MEMORY 

; ADDRESSES IF NO ERRORS HAVS 
; BEEN FOUNL 


;MASE SURE NO ERRORS 
;NONES YET, JUMP 

sREMOVE THE CARRIAGES RETURN 
; FROM THE OUTPUT STRING 


; (BC = CONTENTS OF MEMK 
' AND MEMK + 1) 


SCONVaGer EOGICAL “AND OF 
; FAILING ALDRESS ES 


* (BC = CONTENTS OF MEML 
; AMD MEML + 1) 





MEM67 


A 
F 
C 


Hott Hee KH HH 4 Me 


te 
a 
a 
— 


ERR2 


ERROR 


A=xxxx 


XOR 


MOV 
ONY 
LXI 


CALL 
LXI 
CALL 
LDA 
RLC 
STA 
FOr 
JMP 


P=xx 


C,L 
H 
do ,MEMG4 


CHA 
H,MEMG 
Pore at 
MEMJ 


MEMJ 
D 
MEM1 


ERROR AULITING ROUTINE * 
CONSOLE OUTPUT OF THE FORM: 


C=xx 


FAILING ALTTRESS 
CALCULATED PATTERN 
ACTUAL CONTENTS OF ADDRESS 


SCONVERT LOGICAL ‘OR’ OF 
; FAILING ALPRESSES 


sPRINT PASS AULIT 


sROTATE BIT CROSSTALK SC THAT 
> OVER EIGHT PASSES ALL EIT 

» PATTERNS WILL BE USED 
»>RESTORE LBA+1 

sOLART ANOTHER PASS 


ERROR-TYPSE 


EXCLUSIVE OR OF PATTERN AND CONTENTS 
(ISOLATES FAILING BIT(S)) 


BRROR-TYPE 


PUSH 
MVI 
OTA 
MVI 
STA 
BOP 
JMP 


PUSH 
MVI 
STA 
MVI 
STA 
BOP 


PUSH 
PUSH 
PJSH 


PUSH 
XRA 


MOV 


RD PRESUMED READ 


(SOFT) ERROR 


WT PRESUMEL WRITE (HARD) ERROR * 


PSW 
ae 
MEMDS 

| 
MEMD5+1 
PSW 
ERROR 


PSW 
Aeenon 
MEMDS 
Mau 
MEMDS+1 
PSW 


»sPOSSIBLE WRITS ERROR 


sPOSSIBLE REAL ERROR 


sSAVE ALL REGISTERS LURING 
» ERROR AULIT 


*LOCTGAMERCLUSIVE °“CR’ OF 
; CMLCUMATEL PATTERN ANT 
; ACTUAL MEMORY CONTENTS 








ERRS 


LXI 
CALL 
ROP 


MOV 
LXxI 
CALL 
MOV 
LXI 
CALL 
Or 
PUSH 
LXI 
CALL 
LHLT 
INX 
SHLD 
PO, 
PUSH 
LHLD 
MOV 


ANA 
MOV 
MOV 
ANA 
MOV 
SL 
LHLD 
MOV 


ORA 
MOV 
MOV 
ORA 
MOV 
SHLD 
LDA 
ORA 
JZ 
LXI 
CALL 
Ee 
For 
POP 
RET 


remo Pe Tee em Mm 


H,MEMI4 
CHAB 
PSwW 


C,A 
H,MEMIS 
CHAB 
Ce 
H,MEMI2 
CHAB 

B 


B 
H,MEMD1 
CHA 
MEME 

A 

MEME 

L 

L 

MEMK 
A,. 


tt bets *~ 
be Se EP 
tt 


@ 


sCONVERT ‘OR’ FOR OUTPUT 


sGET MEMORY CONTENTS AND 
> CONVERT 17 FOR OUTPUT 


sCONVERT PATTERN 


sCONVERT CURRENT MEMORY ACTRESS 


;COUNT ERRORS THIS PASS 
sGET CURRENT MEMORY ADDRESS 


‘SAVE OLOGLGAL “ANI OF 
; FAILING ALLDRESSES 


Fo LOCTOAL. OR OF 
; PATOING RELRESSES 


sCHECK ITEMIZE ERRORS FLAG 


;OKIP PRINT IF FLAG = @ 
»PRINT ERROR AUDIT 


sRESTORE REGISTERS AND 
> ReLURN TO MAIN TEST 


* COMPUTE TEST DATA PATTSRN FOR GIVEN MEMORY ADDRESS * 
& 


e CALL WITH FL 


= MEMORY ALTDRESS 








oe 
a 


* RETURN 
PATIN 


RAT SO 


Pati 


ZEROS 


ONES 


Reale 


PATS 


FAT 


fe 


PAT6 


PUSH 
ay t 
LkI 
DAD 
TAL 
DAL 
XTHL 
NOP 
RET 
JMP 
JMP 
JMP 
JMP 
JMP 
JMP 
JMP 
JMP 
Jie 
SIE 


MOV 
RRC 
RRC 
RRC 
XRA 
ANTI 
JZ 

XRA 
RET 
MVI 
RET 


MOV 
RET 


MVI 
RET 


MOV 
CMA 
RET 


MVI 
RET 


EQU 


C = PATTERN COUNTER 


= TATA PATTERN * 
s>PATTERN COMPUTATION 


a 

B,d s>BRANCH ON PATTERN 
H, PATTO-—-S 

B 

iP 

B 


;(RESTORE MEM ATTR) 


; (BRANCH) 
PATI ;1 CAMBRIDGE PATTERN 
PAT2 ;2 ATLRESS . 
PATS ;S ALTERNATE 1°S AND @°S 
PAT4 ;4 ADDRESS INVERSE 
PATS ;5 ALTERNATES @°S ANT 1°S 
PAT ;6 ALL ONES 
PAT? ;7? CAMBRIDGE INVERSE 
PATE ;@ ALL ZEROS 
PATS ;9 BIT CROSSTALK 
PATI ;1@ BIT CROSSTALK INVERSE 
ac ;CAMBRIDGE PATTERN 
H 
1 
ONES 
A 
A, OFTHE 
A,L ;ALLRESS 
A,OAAB ;ALTERNATE 1°S AND @°S 
ne ;ADDRESS INVERSE 
oe ;ALTERNATE @°S AND 1°S 
ONES ;ALL BITS = ONE 
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pat? 


PAT8 


PATS 


ao 1 


Pad ld 


MOV 
RRC 
RRC 
RRC 
XRA 
ANI 
JZ 

ee 


EQU 


MOV 
RAR 
JC 

LTA 
RET 
LTA 
CMA 
RET 


MOV 
RAR 
JNC 
LTA 
RET 


ZEROS 
ONES 


ZEROS 
AJL 


eae 1 
MEMJ 


MEMJ 


A,L 


PAO 
MEMJ 


»>CAMBRITGE INVERSE 


FALlieetS = ZERO 


>DIT CROSSTALK 


sEIT CROSSTALK INVERSE 


SwoUVARY TO HEX ASCII CONVERSION, 16 BITS * 


* 
* CALL HL = 
* BG = 
x 
* RETURNS HL,DE,BC UNCHANGEL 
* A = GARBAGE 
CHA PUSH H 
PUSH D 
PUSH B 
INX H 
INX rl 
INX H 
MVI ie 
CHA1 MOV Meee 
ANI OFH 
CPI QAH 
ae CHA15 
ALI ? 
CHA15 ADI “9° 
MOV M,A 
[cx 31 
MVI E,4 


ATTRESS FOR 4 CHAR ASCII OUTPUT STRING 
16 BIT BINARY DATA 


,OAVE REGISTERS 


;CHAR COUNTER 
»NEXT 4 BITS 


BIS ee ays 

»NO 

»YES 

»>FORM ASCII 

»STORE THIS CEARACTER 

sBACK UP THROUGH OUTPUT AREA 
»>CDOUBLE RIGHT 








CHAZ 


xe 
x 
ne 
* 
x 
* 
te 


CALL 


CHAB 


* PRINT 


%t % 


CALL 


DSPLY 
for bt 1 


ORA 
MOV 
RAR 
MOV 
MOV 
RAR 
MOV 
TCR 
JNZ 
DCR 
JNZ 
ot 
POP 
EOP 
RET 


RETURN 


PUSH 
PUSH 
PUSH 
INX 
MVI 
JMP 


HL = 
i — 


Souter, 2 BITS 


od [> 


Om bd 


so 


>LECREMENT SHIFT COUNTER 
Powe Goes TING 

sDECREMENT CHARACTER COUNTER 
sOTILL CONVERTING 

sRESTORE REGISTSRS 

» AND EXIT 


a 8) 
> 
nw 


Mow awn oO 
ro 
_ 
a 


EeNARY TO HEX ASEITI CONVERSION, 8 BITS * 


ATDRESS FOR 2 CHARACTER OUTPUT STRING 


Crow! BINAgY DAWA 


HL,DE,BC UNCHANGED 


A DESTROYED * 


A »SAVE REGISTERS 


Moo 


ie 
CHAI 


CHARACTER STRING * 


CALL 
MOV 
CALL 
GP 
RZ 
INX 
JMP 


HL = FIRST BYTE ADDRESS OF OUTPUT STRING 
(MUST END WITH ASCII CARRIAGE RETURN) * 
CRLF 
A,M 
USROUT SOUTPUT THIS CHARACTER 
CR SEND OF STRING? 
ES SEMEe 
H ; NO, BUMP STRING POINTER 
DSPLY1 


* GET KEYBOARD ENTRY OF HEX INTEGER * 
x 


as 


RETURN 


HL 


= 16 BIT BINARY DATA * 
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ENTR 


ENTR1 


ENTR1IS 


ENTR2 


ENTRS 


ern iNT 
CRLF 


* MISCELLANEOUS 


MEMA 
MEMB 


LXl 
CALL 


MVI 
CALL 
MVI 
CALL 
oe 1 
RZ 
eri 
RZ 
Ge | 
JC 
ANTI 
DAD 
DAL 
TAL 
DAD 
JC 
CPI 
JC 
CPI 
JNC 
ral 
JC 
ATI 
ANI 
ORA 
MOV 
DCR 
RZ 
JMP 
piv 1 
CALL 
JMP 


H, 00000 
CRLF 


Ai 
USKOUT 
Cr.4 
USRIN 
CR 


ENTRS 
“Sg 


ENTRS 
nas 
ENTRS 
“A 


ENTR2Z 
g 

QFH 

L 

CA 

C 


ENTR1 
eee 
USROUT 
ENTR 


sINITIALIZE CATA 

sOSEND CARRIAGE RETURN & 
> LINE FEED 

,OEND A CUE MARK 


»CHAR. COUNTER 

>GET 1 CHARACTER 
»CARRIAGE RETURN? 
»YES, SKIT 

sLINE FEEL? 

piles, EAT 

oe by (U=S 7 

»YES 

»NO, FORCE LOWER CASE 
sOHIFT PREVIOUS DATA Lert 
» 4 BITS 


‘IF OVERFLOW, PRINT °?’ 
sIS IT O-F? 
SILLEGAL CHARACTER 


;ITLLEGAL CHARACTER 

VIS IT A~-F? 

Opel Oo oeS 

sADD FULGE FACTOR 
sISOLATE 4 BITS 

>MERGE WITH PREVIOUS CATA 


»COUNT CHARACTERS 
sEXIT IY 4 RECEIVEL 
»GET ANOTHER CHARACTER 
»>PRINT QUESTION MARK 


; AND RESTART ENTRY 


CARRIAGE RETURN AND LINE FEED * 


MVI 
CALL 
MVI 
CALL 
RET 


DB 
is 
UB 


A,CR 
USROUT 
A,LF 
USROUT 


MESSAGES AND VATA AREA * 


“8088 MEMORY TEST - VERSION 2.5°,L¥,CR 
“ENTER ALCLDTRESS OF FIRST MEMORY BYTE’ 


TO TMST:° CR 


MEMC 


MEMD 
MEML1 
MEMLe 
MEMDS 
MEMD4 
MEMDS 
MEME 
MEMF 
MEMG 
MEMG1 
MEMGe 
MEMG2S 
MEMG25 
MEMGS 
MEMG4 
MEMI 
MEMJ 
MEMK 


MEML 
MEMM 
MEMN 
MEMP 
MEMT 
MEMT1 
MEMU 
MEMV 


MEMX 


USRIN 


USROUT 


DB 
CB 
DB 
CB 
CB 
DB 
CB 
CB 
DW 
cW 
DB 
DB 
UB 
DB 
DB 
CB 
CB 
DW 
CB 
CW 


CW 


DB 
UB 
CB 
DB 
cB 
UB 
DB 
UB 
DB 


UB 
DB 


CW 


Figioa 
PUSH 
Pe wia 
MV I 
CALL 
BOP 
noe 
EOP 
RET 


PUSH 
PUSH 


“ENTER ADDRESS OF LAST MEMORY BYTE’ 
ferOe esr: ,CR 


“ADDRESS=° 
“$555 PATTERN=" 
“$5 =CONTENTS=" 
/t rons 
Aco mme ee E= 
AOR 
g *SRRORS THIS PASS 
g sPASS COUNT 
ole ee) ~ 
2222 ERRORS: ” 
“55$$ CUM. ERRORS: ° 
Secu 
CR, ANDS: ” 
SURG og 
Shee OR 
Q eon LaeAD DRESS TO TEST 
OFEH sBIT CROSSTALK PATTERN 
-1 ECGs “AND OF PAIELING 
>; ADDRESSES 
g SLOGHeaieOR OF FAILING 


; ALDRESSES 
Ie COON Een. bly 
“I=ITEMIZE ERRORS, ° 
“T=PRINT ERROR TOTAL ONLY, 
HeUXIT elas CR 
g HPAGet=(TEMIZe, O@=TOTAL 
“END OF PROGRAM USEL AS FIRST ” 
“ADDRESS TO TEST = * 
VOSSi5 Gul 
“ERROR: LAST BYTE ALDRESS LESS ” 
“THAN FIRST BYTE ADDRESS.’,CH 


? 


LF 

“TO ABORT TEST PUSH ANY KEY’ 

Ch 

Gg ;CUMULATIVE ERROR COUNT 


sGET INPUT FROM HOST CONSOLE 


wo Mma OM ww 
tn ~~ 
=) 
— 
© 


sOSEND CHARACTER TO HOST 
» CONSOLE 


~ bd 
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USRSTAT 


BSOUT 


STACK 


TEND 


Pur 
MVI 
CALL 
Ee 
POL 
POP 
RET 


PUSH 
PUSd 
PUSH 
MV I 
CALL 
POR 
FOR 
BOE 
RET 


MV I 
CALL 
RET 


eS 
ECU 
BND 


WoO MaQamnow 


Rvp ee 
JSROUT 


64 
+2 
1808 
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sOEE IF CHARACTER [5 


*>PRINT A BACKSPACE 


sonT UP FOR S2 LEVELS 


WAITING 





NOTSSH¥ddNsS NNAW ON 


NOILVOOT 
GUId]9GdS WOM KUYOWTW SAW ALNIAXT 
QPIOSNOD OL (S)NOILVIOT AYOWAW STW dWNnd 
KMNOWHW SIW NI SONANOAS ALAG ALVOOT 
GTLAG GXIdIOTdS HLIM AYOWIW SdW ITId 
AYOWHW SIW AO LAS SNONNILNOD 
(S)NOILVOOT AYOWHW SIW LYOS/ANIWVXG 
FTTI1d NSIT XAH OL AYOWAW SIW AVOTdN 
ANOWHW SIW OL NSIT - ATIA XAH IVOINMOT 


SANVWWOO SdW 


*W 
ol 


e 
oO Ts wd 


ANA 


‘TOHLNOOD NI JLSOH 


€< NOILIO NNAW LAdNI 


W/dd OL NUNDLAY 


GSOH Ob IOULNOD WHLSAS NUNLAY 


LOVULENAS Y TIV TWWIOdIVXaH 
SNOILONULSNI JISVE 


ANAW ONIDNIYd SSAUddNS LON OG 


NNAW ONIGNIYd SSdUddNs 


SNVWWOO JLSOH 


ONILSIT ANIN DIdNVS 


J XIQNdddV 


>SNLVLS WALSAS 


* if 
ac 
°d 
“ 
* € 
a 
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< ANNIGDNOD OL AMY ANY SSHUd 


TVONVW SL, HASN GTHL LINSNOD “STIVIGd UFHLYNA WOT °F 
“ANAW GHL Od 

TANUNLAY SI HASN AHL NAHL GAAINI ONTUNT IGUAONA ST ACY AdVOSA AHL AI ve 
“G(HAVIdSIG dd 

OL SLYNYOT LAAN] FHL ASAVD TTIM GdWOUd AHL YALAV TAAALNA WHYW NOTLSANO V “I 
“TVOANVW S,44SN AHL WINSNOO *SNOTLdAOXA YO °AAYAH TASN ST JIT 

S HONVASTH IVIISIG NI A9SN SV LYWHOd O/I VLIVd GWVS AHL “TVYENAD NI CH 
“XVLNAS TVOTITI INV “SHALIWITAI 

MGq OOL HO ANVYW OOL ‘SLIDIIT XXH TITVANI GYV HOUNT NOWWOD AO SHTOUMNOS °d 
"SSa1T HO OML LSVI AHL *SLNMNI ViVd YOK $fAINTLNA SHALOVAYVHO XH 

SSIT HO YNOA LSVT AHL ANVL SAVMIV 'ITIM WVHDONd AHL “SLNMINI SSAYITV YOd oA 

“W/dW INV W/dd NI S¥ SI LNdNI NO ONIEIIG ANIT TYWHON “a 

"d99a ANIT HO NSNLAY FOVINNVO V HLIM SLNAUNI FALVNIWYAL °d 

“NOILVLON XHH NI Ad OL TALOTMXA AYV SLNAMNI VLVI INV SSHUITV °9 

“€aSVO JOMOT HO HAddN NI AG AWW SLNAMNI TITV “a 

°" < SI ViVd JO LNdNI YO LdWOUd FHL *¥ 


>SNOILONUYLSNI SIWVY OISVE 


ONILSIT NOILONYLSNI OISVd FIdWVS 


J XIGNdddV 
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TTId WOT ASN OL VLVI XAH SI 22 
‘NGIMLTIT TTId OL SASSHHACY ANA 
INV LYVLS XH STW AMV AAXX 9 XXXX 
TMINI SI NOILdO FHL ‘Ladwoud 
FHL YALAVY GUdAL SI ,°, V KINO dI 
(SHYMLIWITAT ONITNIONI ‘X¥W SHIUYLNA GSz) 
KHOWHN STW OLNI AMGNA WOd VIVI XH GV 
TONVHO LSU 
Od SSHUQIV DUVLS XTH SIW SI XXXX 

ee Sioa 10 

VL¥Q X€H MAN SI ZZ JO 
NUNGIN ADVIYNVO SI 22 ‘SSTHTIV LVHL Ly 
VLVI XHH SI AK ‘SSHNTIY XAH SI XXXX 
LAS (NY ANIWVXG 
OL SSHNTIV XTH SIW LSHId SI XXXX 
TVOTdN HO SASSTYTIV ING 
(NY LAVLS X9H SQW THYV KAKA Y XXXX 


TIVNOILdO SI (XaMH°) 
SHHOTLNI XGdH AUV KAAAK Y XXXX 
(N-V) NOILOGTAS NOILdO SI X 


> SMOTTOd 


€< GANIGNOO OL AGH ANY SSUUd 


ZZ KAKA XXXXC< 


oe Oe TiC 


XXXXC< 


ZZ KK XXXX< 
XK 


KAA XXXX< 
(XTH* )AWYNTTIAC 
(XTH* )AWYNT TIA 

KAAK XXXX< 


X< 


S¥ LuV SLVYWHOT HALAIWVUVd LNdNI 


ONILSIT LVNYOI YaALINVAVd LNdNI ATdWVS 


H XIGNdddV 
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